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1.0 ABSTRACT 


This diagnostic serves as a replacement to DEKBGA, the 11/70 Power 
Fail Test. It provides all of the coverage and features of the 
previous power fail test along with the added features of diagnostic 
We A ver multiprocessor systems using the K811-CM Processor and the 
nter face. | 


The test is divided into two sections, Section 1 and Section 2. 
Section 1 completely replaces DEXBGA and basically serves as a test of 
CPU Logic validity during a power Fail sequence. This section can be 
run on a standard urmodified 11/70 processor as it utilizes no 
multiprocessor resources. Section 2 is enabled by enabling console 
switch 6. This section will be executed directly after section |. 
This section provides testing for proper functionality of the 
Interprocessor Interrupt and Sanity Timer (IIST) powerfail procedures, 
and memory system activity during a loss of power on the system or one 
of its subsystems. 


This diagnostic also supports the use of the UNIBUS Exerciser (UBE) to 
perform simulated powerfail sequences during the execution of Section 


2.0 REQUIREMENTS 


2.1 Equipment 


THIS DIAGNOSTIC IS DESIGNED TO TEST PDP-11/70 SYSTEMS USING THE K8-11B/C 
PROCESSOR. A CONSOLE TERMINAL IS REQUIRED FOR MESSAGE AND ERROR REPORTING. 
A UNIBUS EXERCISER MAY OPTIONALLY BE USED. 


NOTE: THIS DIAGNOSTIC ALSO SUPPORTS THE PDP-11/74, AN IN-HOUSE, EXPERI- 
MENTAL PROCESSOR IN BOTH STANDALONE AND MP MODES. 


2.2 Storage 


The Power Fail test runs in 12K words of memory. The first 4K is used 
for stack areas and common access data. The second 4K contains the 
program itself. The only data elements that reside here are type and 
error messages, and execution flow and controi variables that are used 


(modified) when the processor runs in multiprocessor mode. The next 
4k »'3, used as buffer space for massbus transfers that occur during 
tes . 


2.3 Preliminary Procedures. 


ALL standard 11/70-74 CPU diagnostics should first be run to_ insure 
te operation under a secure power condition. Specifically, the 
LIST diagnostic and Unibus Exerciser diagnostics should be run, _ If 
massbus devices are to be used for test 21 it might be wise to insure 
that the devices are in proper worki order. The power fail 


diagnostic may use all massbus drives. memory boxes accessible by 
the CPUs perticigat ing in this di tic. Therefore, it is important 
to switch offline to participating CPUs all data storage equipment 


that the operator does not want corrupted by this diagnostic. Before 
starting the power-fail diagnostic the rator should also be sure 
that the CPU power-up action switches (on the IIST front panel) are 
all ‘Run or Halt’’ for participating CPUs, the IIST enable switches are 
‘online’’, and the IIST configuration switches are all at the same 
— for all participating CPUs. A\l participating memory boxes 
should be online to all participating CPUs. 


The operator of this test should be familiar with the MKA11 and IIST 
boot/control panel. 


3.0 LOADING PROCEDURE 


This diagnostic can be loaded within the standard XXDP loading 
procedure. Note that if this diagnostic 1s being run as part of a 
chain that it must be the last element in that chain. 


This di stic is loadable under the APT system but can only be run 
under APT in Uniprocessor mode with the UBE enabled. 


4.0 STARTING PROCEDURE 

4.1 Starting Address 

og starting address for this diagnostic is 200. The restart address 
4.2 Control Switch Settings 

The switch settings are as follows (when set to 1): 

adh . + on Saar idecetan 1 only) 


y 
SWO8 - Enable System Power Fail Test (Test 25) 
SWO7 - Disable Section 7 Tests (Multiprocessor mcde only) 
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Uniprocessor mode, manual powerfail. 

(this mode oon vere a AY lLacement for 
previous powerfail diagnostic 

0 1 Uniprocessor mode, automatic (UBE) powerfail 
(uniprocessor mode that should be used under APT) 
Multiprocessor mode, manual powerfail. Both 
sections (1 and 2) are executed. 

1 1 Multiprocessor mode, automatic (UBE) powerfail. 
Only Section 1 will use the UBE. Each CPU 

must have a UBE. 


Note that for the multiprocessor modes (SW6 enabled) the IIST ‘’system’’ 
ID of each CPU per tts Teer ore in the test should be specified by 
setting the appropriate bit in Switches 0-3 in the switch register. 
For example, if all processors in a 4 processor system are to be 
tested then switches 0-3 should be enabled. If only CPU's 0 and é are 
to participate then only switches 0 and 2 should be enabled. 


The switches are defined by the master CPU only (in multiprocessor 
), where the master is the CPU that starts or restarts the 
program. Each slave CPU uses the switch definitions of the master. 


© 


The Program will not interpret changes to the switches in 
prot a rhe al mode while the program is running. The program must be 
restarted. 


4.3 Restarting Procedures 


The restart address for this diagnostic is 220. A restart should be 
considered a completely new session therefore be sure the proper 
switches are enabled for the features that you want. 


4.4 Program And/Or Operator Action 
NOTE 


Be sure to isolate the CPU's that are to 
participate in the powerfail test from 
other CPU's that are to remain 
functional. Participating CPU's should 
have the IIST configuration switches 
found on the IIST panel switched to the 
SYSTEM B position (if this is_ the 
default position for the installation 
eo Mga SYSTEM A position could be 
used). 


SEQ 0006 


5.0 OPERATING PROCEDURES 
5.1 Modes Of Operation 


This diagnostic is designed to run in four basic modes specified by 
the selection of bits 5 & 6 in the console switch register. It should 
be noted that if a multiprocessor mode is chosen (SW6 enabled) that 
the first CPU started will become the ‘master’’ and successively start 


the remaining participating CPU's, the ‘Slaves’. 


5.2 Common Procedures 


Load address 200 and then enable the switches for the test mode that 
is desired. Remember to enable the appropriate CPU mask bit if you 
are running a multiprocessor mode. When this has been done insure 
that all slaves are powered up and have their halt switches in the 
“enable’’ state if MP mode is to be used. Hit start - the program name 
will be typed followed by the mode the diagnostic 1s running in 
(uniprocessor or multi-processor) followed 7 the contents of the 
switch register and whether the Unibus Exerciser will be used to 
simulate power fails. 


5.3 Notes And Warnings 


1, Power failures in section 1 are only allowed when expected. 
Therefore in manual mode do not remove the power until the 
test number appears in the display register. 


2. Power failures are not allowed during the execution of the 
End of Pass (EOP) routines. Note that the number displayed 
during the End of Pass is the Pass number NOT the test 
number . 


3. When running the diagnostic in uniprocessor mode on a_ single 
CPU that is_ part of a multiprocessor system make sure that 
the IIST configuration switch for the respecitve CPU is_ in 
the STAND ALONE position and the IIST E E switch is in the 
OFF LINE position. 


4. When running in multiprocessor mode insure that the subsystem 
under test is isolated from any system that is still running 
by switching the CPU's under test to an alternate postion 
with the JTIST CONFIGURATION swtiches. For example, if the 
default system normally runs on the ‘SYSTEM A‘ postion, 
Switch the subsystem under test to the ‘SYSTEM B’’ position. 
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5.4 Uniprocessor Mode, No UBE 


The diagnostic will instruct you to ‘‘interrupt the power after the 
test number appears on the display’’. Interrupt the power only at this 
time. If the test is successful then the next test mumber should 
appear in the ~ When the End of Pass is reached the Pass count 
will be typed. There are no error reports in Section 1 (except for 
unexpected traps to 4 and 114.) Normally, anerror results ina 
processor halt. 


5.5 Uniprocessor Mode, With UBE 


In this mode the UBE is used to perform the power Fail procedure. No 
‘interrupt the power...'’ message is typed before the UBE takes action. 
The test number and pass number however dco appear in_ the Sieg a7 
register. An EOP message is typed equivalent to that of Section 5.4. 
Note that in this mode only the CPU logic involved in the power-fail 
sequence is tested. Failures that may occur because of problems in 
the Power system will go undetected. 


5.6 Multiprocessor Mode, No UBE 


In multiprocessor mode the CPU that is initially started becomes the 

MASTER’’ CPU. What this means is that all error messages ane Lyetouts 
will appear on this CPU's console. This CPU is also responsible for 
startup of ‘'slave’’ CPU's. Slave CPU's are the remaining CPU's that 
are scheduled to participate_in the test by their appropriate bit 
being set in switches 0-3 of the master CPU's SWR. When start is 
depressed and multi-processor mode is specified the program name, test 
mode, and switch register setting will be typed upon the master CPU 
console. The remaining CPU's will then be booted and then interrupted 
through the masters IIST. This will be followed by an ‘‘interrupt the 
power...'' message. 


The ID of the processor responsible for typeouts and error messages 
will precede the message: 


Run each processor through section 1 one at a_ time. After 
power-failing the last test in Section 1 (Test 16) on one CPU go on to 
the next CPU, etc. After the last test on the last CPU has_ been 
— in Section 1, the operator will receive instructions at 
console. 3 


Whereas there are no prompts printed at the console in Section 1, ali 
power fails in Section 2 must be done in exact agreement with the 
typed-out instructions. 


Section 2 prompts the operator to remove the power from a particular. 


element of the system. If the expected results occur then the next 
element is tried. When all relevant elements have been tried then the 
diagnostic precedes to the next test. Section 2 contains tests 17 


through 25. 





5.7 Multiprocessor Mode, With UBE 


This mode is the same as ‘multiprocessor mode, no UBE’’ except that 
Section 1 will be done without manual intervention. AL\ CPUs that are 
to participate must have a UBE module. 

6.0 ERRORS AND ERROR REPORTING 

Error reports are always typed out on the console of the CPU that was 
first started. This is the ‘master’’ CPU in multiprocessor mode. All 
error messages are preceded by a tag as follows >" where n'‘s_ the 
11ST self-ID of the encountering the error. Typing in 
multiprocessor mode is always done by. the master. If the master is 
without power when typing is required, the messages will be queued and 
printed when power has been restored. 

7.0 TEST DESCRIPTIONS | 

The tests that are found in section I are simple power fail tests that 
guarantee that the proper machine states are entered on power fail and 
power up. The test names are self- explanatory. 


Section 1 


1. Simple Down/Up test (Kernal node) 

2. Program Voltility Test a 
Verify that the memory bank containing the program will not 
be corrupted by CPU power fails. 

3. Simple Down/Up test (Supervisor mode) 

4. Simple Down/Up Test (User mode) 

5. Power fail with odd address 

6. Power Fail in the Red Zone 

7. Power Fail with memory timeout (kernal) 

10. Power Fail in the yellow zone. ‘ 

11. Power Fail with resets. 

12. Power Fail with odd address (Supervisor). 

13. Power Fail with Timeout (Supervisor) 

14. Power Fail with odd address (User) 

iS. Power Fail with timeout (User) 

16. Memory Management Abort Test 


17, 


20. 


21. 


Section 2 





After all CPUs reach the beginning of Section 2, each CPU 
sizes for RPO4/5/6 massbus devices. If no devices are found 
the following message is printed: 

No Massbus Device Available On CPU #n 


If the only massbus device found has its PGM bit set, the 
following message is printed: 


Warning: Drive #n 
On CPU #n 
ls accessible over Ports A and B 


and will be used Later in this diagnostic. 
Check ‘BRK'' & 'DCF*’ FLAGS during power fail. Insure that the 
IIST’s of functioni CPU's receive BRK & DCF _ signals 
corresponding to the CPU that performed a Power Fail. 


— operator will be prompted with messages of the following 
ype: 


Power Fail CPU #n 
After restoring power, each of the other CPUs should report: 


CPU Interrupt As Expected 


Check power fail during high memory activity. Insure that 
power down sequences can be performed by a CPU while other 
CPU's are contending for the memory bus. 


be operator will be prompted with messages of the following 
ype: 
Power Fail CPU #n 


There is no report from the other CPUs after restoring power. 


Check power fail during massbus transfer. Insure that power 
down sequences can performed by a CPU while other CPU's 
are performing massbus read operations. Also verify that the 
read operations don't experience any loss of data due to the 
power condition of an uninvolved CPU. 


— operator will be prompted with messages of the following 
ype: 


Power Fail CPU &n 


SEQ 0010 


22. 


23. 


a 
If there are no massbus devices for the other CPUs to use, 
then the following messages are printed instead of the above 
message: 


No Massbus Device Available On CPU #n Proceeding 
To Next CPU. 


There is no report from the other CPUs after restoring power. 


Insure that a loss of AC power on a MKA11_ semiconductor 
memory box does not cause a power fail sequence to occur on 
any processor that has a disabled part to that box. 
The operator will be prompted with messages of the type: 

Get Set To Power Fail Mem Box #n 


Put battery backup on all memory boxes 
Make all memory ports offline only on mem box to be power 


failed 
Make all CPU power-up switches ‘Run or Halt’’ 
Now Power Fail The Mem Box 
Restore power 5 seconds after power fail 
Restore all memory ports online 
Then type any character at the master console 
No CPU should report a power fail 
The master should report *DOk’’. 
Check AC power fail on memory box. Insure that a loss of AC 
power on a MKA11 semiconductor nr box causes a power fail 
sequence to occur on any processor that has an enabled port 
to that box. 
The operator will be prompted with message of the type: 
Get Set To Power Fail Mem Box #n 
Put battery backup on all memory boxes 
Make all memory ports online 
Make all CPU power-up switches ‘Run or Hait’’ 
Now power fail the mem box 
Restore power 5 seconds after power fail then type any 
character at the master console. Each CPU should report a 
power failure. 
Each CPU should report the following message: 


Power Failure On CPU As Expected 


SEQ 0011 


24. 


25. 


1 


Check DC Power Loss on a memory box. Insure that the slave 
CPU(s) specified thr the IIST Boot/control panel perform 
a boot operation when AC & DC power are restored to the 
memory box. 


The operator will be prompted with message of the type: 

Get Set To Power Fail Mem Box fn 
Disable mattery backup on mem box to be power-failed. Put 
all slave C mem ports online. Make master CPU mem port 


offline only on box to be power-failed. Make all CPU 
power-up switches "RUN OR Boot’. 


Now Power Fail The Mem Box 
Restore power 5 seconds after power fail 
Restore all mem ports online 
Restore all CPU power-up switches to ‘Run or Halt”’ 
Then type any character at the master console 
Each slave should report an interrupt 
Each slave CPU should report the following message: 
CPU Interrupt As Expected 
Check system recovery on power fail. Insure that a _ total 
momentary loss of AC power on a system level is recoverable 
without operator intervention. 
The operator will be prompted with the following message: 
Get Set to Power Fail Entire System... 
Put battery backup on all mem boxes 
Make all memory ports online 
Make all CPU power-up switches ‘Run or Halt’ 


Now Power Fail the Entire System 
Restore power 5 seconds after power fail 


Each CPU should report the following: 


SEQ 0012 


8.0 MISCELLANEOUS 


Test 24 will not be done on the memory box with base address 0. 

Therefore, in order to fullY test all system elements the operator 
should restart this diagnostic a second time and switch the box with 

base address 0 with another box (using the thumbwheels to switch base 

oem pa The operator should also switch master CPUs on the 
restart. 


Test 22 will be skipped if there is only one MKA11 memory box. Power 
Failing thr Section 1 with the UBE will not necessarily test power 
fail during address crag. timeout, etc. (it depends on when the 
UBE starts the power down). Therefore, it is recommended to manually 
power fail Section 1! 


SEQ 0013 
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TITLE MAINDEC-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 
:*COPYRIGHT (C) 1978 

>*DIGITAL EQUIPMENT CORP. 

; #MAY YNARD, MASS. 01754 


: sPROGRAM BY JIM LACEY, JEFF WHITE, BILL SCHLITZKUS 


<eTHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
: sPACKAGE (MAINDEC-11=DZQAC-C3), JAN 19, 1977. 
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11~+70/74 SYSTEM POWER FAIL DIAGNOSTIC 





S DIAGNOSTIC IS DIVIDED INTO TWO SECTIONS: SECTION 1 TESTS THE 
C OF A PROCESSOR TO crag th Mh yg oly 
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SEQ 0014 
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MAINDEC=11~CEKBG~C _ PDP=11/70 SYSTEM POWER FAIL — MACYT1 3OA(1059) 13-MAR-B0 16:04 PAGE 3 | 
CEKBGC.P11  13-MAR-BO 16:04 SE 0015, 
57 ::* IS NOT BEING USED, THE OPERATOR MUST POWER FAIL EACH CPU . 
58 :i® MANUALLY THRU THE'16 TESTS OF SECTION 1 TO GET THE CPU TO THE : 
59 :i* ENTRY POINT OF SECTION 2. . 
60 ji" | BEFORE STARTING THE PROGRAM, BE SURE THAT THE CPU POWER-UP =: 
61 iis ACTION SWITCHES (ON THE 11ST FRONT PANEL) ARE ALL . 
be zie "RUN OF HALT'’, THE IST ENABLE SWITCHES ARE ONLINE, ‘ 
é :i* THE LIST CONFIGURATION SWITCHES ARE EITHER ALL SYSTEM m0 OR 1 . 
6 :i® ALL PARTICIPATING MEMORY BOXES SHOULD BE ONLINE TO ALL PARTIC- * 
65 :3* IPATING CPUS. . 
66 b Pettit tii itit titi titi iii 
67 
68 ; SWITCH REGISTER DEFINITIONS 
70 STHE SWITCHES ARE DEFINED BY THE MASTER CPU ONLY, 
71 WHERE THE MASTER 1S THE CPU THAT STARTS OR RESTARTS 
72 THE PROGRAM. EACH SLAVE CPU USES THE SWITCH DEFINITIONS 
rs :OF THE MASTER. 
75 THE PROGRAM WILL NOT INTERPRET CHANGES TO THE 
76 “SWITCHES IN MULTIPROCESSOR MODE WHILE THE PROGRAM IS RUNNING. THE 
ad :PROGRAM MUST BE RESTARTED. 
9 :Sw15=1 HALT ON ERROR 
81 ;SW14= LOOP ON TEST (SECTION 1 ONLY) 
82 : SWO8=1 ENABLE SYSTEM POWER FAIL TEST (TEST 25) 
83 :SwO7=1 DISABLE SECTION 1 TESTS (MULTIPROCESSOR MODE ONLY? 
84 ; SWO6=1 ENABLE MULTIPROCESSOR MODE/SECTION 2 TESTS 
85 : SWOS=1 ENABLE UNIBUS EXERCISERS (SECTION 1 ONLY, EACH CPU MUST HAVE A UBE? 
86 > SWO3=1 TEST CPU #3 (IIST SELF 1D), MULTIPROCESSOR MODE ONLY 
87 :SwO2=1 TEST CPU #2 
88 ; SWO7= TEST CPU #1 | % 
89 : SWOO=1 TEST CPU #0 ‘ ” 
30 -SBTTL BASIC DEFINITIONS 


9 ;*INITIAL_ADDRESS OF THE STACK POINTER 
9 013776 STACK= 13776 -FIRST ADDRESS OF THE STACK 
9% 013776 KERSTK= STACK : KERNEL STACK 
95 013576 SUPSTK= STACK-200 ; ; SUPERVISOR STACK 
%% 013476 USESTK= STACK=300 >:USER STACK 
97 -EQUIV EMT,ERROR : CBASIC DEFINITION OF ERROR CALL 
98 “EQUIV IOT,SCOPE >*BASIC DEFINITION OF SCOPE CALL 
99 177776 PS= 177776 = :PROCESSOR STATUS WORD 
100 -EQUIV PS.PSW 
101 177774 STKLMT= 177774 ;3STACK LIMIT REGISTER 
102 177772 PIRQ= 177772 “PROGRAM INTERRUPT REQUEST REGISTER 
103 177570 DSWR= 177570 : HARDWARE SWITCH REGISTER 
104 177570 DDISP= 177570 “HARDWARE DISPLAY REGISTER 
105 177546 LKS= 177546 “=LINE CLOCK (KW11-L) STATUS REGISTER 
107 = *MISCELLANEOUS DEFINITIONS 
08 000011 HT= 11 :: CODE FOR HORIZONTAL TAB 
09 000012 LF= 12 ;3CODE LINE FEED 
000015 CR= 15 :;CODE CARRIAGE 


9 RE TURN 
Ht 000200 CRLF= 200 "CODE FOR CARRIAGE RETURN-LINE FEED 


ae | 
mm 
a | 
vi 
— td 


: 


ee eed eed oe ed 
ODONOUPw 


OR eh ee ee ad dt td at od ot 


GAAAGREEEERERRER 
BEIT ARUNLS SS ASS RAD SS SEE ARNIS VRVRR RTS 


a ee ee ee ee 


SIKFALAVLS 


¥) 
a fl SYSTEM POWER FAIL MACY11 3004053) 135-MAR-80 16:04 PAGE 4 


1=CE 
eee maR-80 16:04 BASIC DEFINITIONS 
:*GENERAL PURPOSE REGISTER DEFINITIONS 
000000 RO= «20 ;:;GENERAL REGISTER 
000001 Riz 2 : GENERAL REGISTER 
R2= 2 GENERAL REGISTER 
00000 R3= «3 : GENERAL REGISTER 
Ro= : GENERAL REGISTER 
000005 ~~ fs ::GENERAL REGISTER 
R6= --%6 GENERAL REGISTER 
000007 eee ;:GENERAL REGISTER 
-EQUIV RO,R10 :}GENERAL REGISTER 
EQUIV R1.R11 ::GENERAL REGISTE 
“EQUIV R2.R12 : GENERAL REGISTER 
EQUIV R3.R13 : GENERAL REGISTER 
EQUIV R4.R14 ;;GENERAL REGISTER 
EQUIV R5.R15 GENERAL REGISTER 
000006 = STACK POINTER 
EQUIV SP.KSP ; ;KERNEL STACK PO 
“EQUIV SP.SSP RVISOR STACK POINTER 
“EQUIV SP,USP USER STACK POINTER 
000007 P= =? : PROGRAM COUNTER 
;*PRIORITY LEVEL DEFINITIONS 
PRO= 0 ;;PRIORITY LEVEL 0 
PRI= 40 PRIORITY LEVEL 1 
PR2= — 100 PRIORITY LEVEL 2 
000140 PR3= 140 : PRIORITY LEVEL 3 
PR4= 200 : PRIORITY LEVEL 4 
000240 PRS= 240 : PRIORITY LEVEL 5 
000300 PR6= 300 ; ;PRIORITY LEVEL 6 
000340 PR7= 340 ::PRIORITY LEVEL 7 
:*"'SWITCH REGISTER'’ SWITCH DEFINITIONS 
100000 Swi5= 100000 
040000 Sw14= 40000 
020000 SW13= 
010000 SWi2= 10000 
000 SW11= 4000 
002000 SW10= 
001000 SwO9= 1000 
000400 SWO8= 400 
000200 SWO7= 
000100 SwO6= 100 
000040 SWO5= 40 
000020 SWO4= 20 
900004 S024 
000002 SWOI= 2 
000001 SwOO= 1 
EQUIV SWO09, SW9 
EQUIV SWO8.S 
“EQUIV SWO7,SW7 
EQUIV SWO06,S 
EQUIV SwOS.SW5 


“EQUIV SWwO2.SW2 
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BASIC DEFINITIONS 


-EQUIV 
-EQUIV 


; *DATA 


Sw01 , Sw 
SWO0 . SwO 


BITOO,BITO 


to 


TBITVEC=14 


14 
20 
= 24 
<< 


CACHVE C= 114 


PIRQVEC=240 
MMVEC= 250 ; MEMORY 
CACHE REGISTER DEFINITIONS 


_SBTTL 


HITMIS 


nhnkhkonu 
3 
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177740 


177752 
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BIT DEFINITIONS (BITOO TO BIT15) 
100000 | 


C — TRAP VECTOR ME oot 


OUT AND OTHER ERRORS 
: RESERVED AND ILLEGAL INSTRUCTIONS 


3; TRACE TRAP 
: :BREAKPOINT TRAP (BPT) 
hE gs Hind TRAP (IOT) **SCOPE** 


FAIL 
: FEMULATOR TRAP (EMT) *kFRROR** 
3; TRAP’’ TRAP 
:: TTY KEYBOARD VECTOR 


CTOR 
77LINE CLOCK (KW11-L) VECTER 
;; CACHE ERROR INTERRUPT VECTOR 
; s PROGRAM INTERRUPT REQUEST VECTOR 
Y MANAGEMENT VECTOR 


2 tose 16 BITS OF ADDRESS THAT CAUSED ERROR 
; UPPER SIX pt Bates THAT CAUSED ERROR 


:C RE 
: sMEMORY CONTROL REGISTER 
sMEMORY MAINTENENCE REGISTER 
-:HIT MISS REGISTER '1'* IMPLIES HIT IN CACHE 


SEQ 017 


———— 
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NOW 
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.SBTTL CPU REGISTER DEFINITIONS 


177760 SIZELO = 177760 : sMEMORY SIZE REGISTER NUMBER TO PUT INTO A PAR 
3,70 GET TO THE LAST 32 WORDS OF MEMORY 

177762 SIZEHI = 177762 > HIGH oO REGISTER, RESERVED FOR FUTURE USE 
; CURRENTLY ALL ZERO 

177764 SYSTID.= 177764 17 SYSTEM ID REGISTER 

177766 CPUERR = 177766 


;CPU ERROR REGISTER HOLDS lala THAT CAUSED 
:: THE TRAP TO ERRVEC (000004) 


.SBTTL MEMORY MANAGEMENT DEFINITIONS 


:*MEMORY MANAGEMENT STATUS REGISTER ADDRESSES 


177572 MMRO= 177572 
177574 MMARI= 177574 
177576 MMR2= 177576 
172516 MMRS= 172516 
EQUIV MMRO,SRO 
EQUIV MMR1,SR1 
EQUIV MMR2,SR2 
EQUIV MMR3,SR3 
:*USER ‘'I'' PAGE DESCRIPTOR REGISTERS 
177600 UIPDRO= 177600 
177602 UIPDR1= 177602 
177604 UIPDR2= 177604 
177606 UIPDR3= 177606 
177610 UIPDR4= 177610 
177612 UIPDRS= 127612 
177614 Ul = 177614 
177616 UIPDR?= 177616 
:*USER ‘D'’/PAGE DESCRIPTOR REGISTORS 
177620 UDPDRO= 177620 
177622 UDPDR1= 1276e¢ 
177624 UDPDR2= 177624 
177626 UDPDR3= 177626 
77630 UDPDR4= 177630 
177632 UDPDR5= 177632 
177634 UDPDR6= 177634 
177636 UDPDR7= 177636 
:*USER ‘'I'’ PAGE ADDRESS REGISTERS 
177640 UIPARO= 177640 
177642 UIPAR1= 177642 
177644 UIPAR2= 177644 
177646 UIPAR3= 177646 
tine i 
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CEKBGC .P 6:04 MEMORY MANAGEMENT DEFINITIONS SEG 0019 


281 177650 UIPARG= 177650 
$e 177652 UIPARS= 177652 
177654 UIPAR6= 177654 
cee 177656 UIPAR7= 177656 7 
so6 : USER 'D'' PAGE ADDRESS REGISTERS 
288 177660 UDPARO= 177660 
289 177662 UDPAR1= 177662 
177664 UDPAR2= 1 
291 UDPARS= 1 
$36 177670 UDPAR4= 177670 
29 177672 UDPARS= 177672 
294 177674 UDFAR6= 177674 
re 177676 UDPAR7= 177676 
pda : *SUPERVISOR '‘I'' PAGE DESCRIPTOR REGISTERS 
299 172200 SIPDRO= 1722 
300 172202 SIPDR1= 172202 
301 172204 SIPDR2= 172204 
302 172206 SIPDR3= IZe606 
303 172210 SIPDR4= 172210 
304 172212 - SIPDR5= 172212 
305 172214 SIPDR6= 172214 
308 172216 SIPDR7= 172216 
ae :*SUPERVISOR ‘D'' PAGE DESCRIPTOR REGISTERS 
310 172220 SDPDRO= 172220 
311 172222 SDPDR1= 172222 
312 172224 S = 172224 
313 172226 S = 172226 
314 2230 SDPDR4= 1 
315 172232 SDPDR5= 172232 
316 34 S = 172234 
sf 172236 SDPDR7= 172236 
25 :*SUPERVISOR ‘‘I'' PAGE ADDRESS REGISTERS 
321 172240 SIPARO= 172240 
322 172242 SIPAR1= 172242 
323 172244 SIPAR2= 172264 
4 172246 sipaate 172246 
5 172250 SIPARG= 172250 
326 172252 SIPARS= 172252 
327 172254 SIPAR6= 172254 
328 172256 SIPAR7= 172256 
$80 : *SUPERVISOR ‘"D'' PAGE ADDRESS REGISTERS 
172260 SDPARO= 172260 
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MEMORY MANAGEMENT DEFINITIONS 


SDPARS= 172272 

SDPAR6= 172274 

SDPAR7= 172276 

:*KERNEL ‘‘I'' PAGE DESCRIPTOR REGISTERS 
KIPDRO= 172300 

KIPDR1= 172302 

KIPDR2= 172304 

KIPDR3= 172306 

KIPDR4= 172310 

KIPDRS5S= 172312 

KIPDR6= 172314 

KIPDR7= 172316 

:*KERNEL 'D'' PAGE DESCRIPTOR REGISTERS 
KDPDRO= 172320 

KDPDR1= 172322 

KDPDR2= 172324 

KDPDR3= 172326 

KDPDR4= 172330 

KDPDR5= 172332 

KDPDR6= 172334 

KDPDR7= 172336 

> *KERNEL ‘'I'' PAGE ADDRESS REGISTERS 
KIPARO= 172340 

KIPARI= 172342 

KIPAR2= 172344 

KIPAR3= 172346 

KIPARG= 172350 

KIPARS= 172352 

KIPAR6= 172354 

KIPAR7= 172356 

> *KERNEL ‘'D'' PAGE ADDRESS REGISTERS 
KDPARO= 172360 

KDPAR1= 172362 

SOARS: 179366 

KDPAR4= 19539 

KDPARS= 172372 

KDPARG= 172374 


KDPAR7= 172376 


.SBTTL UNIBUS MAP REGISTER DEFINITIONS 


:*THE LOWER 16 BITS OF THE MAP REGISTERS ARE LABELED “MAPLXX" 
:*THE UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED “MAPHXX" 


SEQ 0020 


ee ee 
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13-MAR-80 16:04 UNIBUS MAP REGISTER DEFINITIONS SEQ 0021 
170200 MAPLOO = 170200 | 
_ 170202 MAPHOO = 170202 | 
170 MAPLO1 = 170204 | 
170 MAPHO1 = 170206 | 
170210 MAPLO2 = 170210 | 
170212 MAPHO2 = 170212 
170214 MAPLO3 = 170214 
170216 MAPHOS = 170216 | 
170220 MAPLO4 = 170220 | 
170222 MAPHOS = 170222 
170224 MAPLOS = 170224 | 
170226 MAPHOS = 170226 | 
17023C MAPLO6 = 170230 
170232 MAPHO6 = 170232 
170234 MAPLO7 = 170234 
170236 MAPHO7 = 170236 
170240 MAPL10 = 170240 | 
170242 MAPH10 = 170242 
170244 MAPL11 = 170244 
170246 MAPH11 = 170246 
170250 MAPL12 = 170250 
170252 mers = 170252 
70254 MAPL13 = 170254 
70256 MAPH13 = 170256 
170260 MAPL14 = 170260 
170262 MAPH14 = 170262 
264 MAPL15 = 170264 
170266 MAPH15 = 170266 
70270 MAPL16 = 170270 
170272 MAPH16 = 170272 
170274 MAPL17 = 170274 
170276 MAPH17 = 170276 
170300 MAPL20 = 170500 
170302 MAPH20 = 170302 
170304 MAPL21 = 170304 
170306 MAPH21 = 170306 
170310 MAPL22 = 170310 
170312 MAPH22 = 170312 
170314 MAPL25 = 170314 
170316 MAPH2S = 170316 
170320 MAPL24 = 170320 
0320 MAPH24 = 170320 
170324 MAPL25 = 170324 
170326 MAPH2S = 170326 
0330 MAPL26 = 170330 
170332 oes = 170332 
70334 MAPL27 = 170334 
170336 MAPH27 = 170336 
170340 MAPL30 = 170340 
170342 MAPHSO = 170342 
170344 MAPL31 = 170344 
70346 MAPH31 = 170346 
170350 MAPL32 = 170350 
170352 MAPH32 = 170352 
170354 MAPL33 = 170354 


MA INDE C-11-CEKBG-C 
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CEKBGC.P11 13=MAR-80 16:04 UNIBUS MAP REGISTER DEFINITIONS SEQ 002: 
449 170356 MAPH33 = 170356 
450 170360 MAPL34 = 170360 
451 170362 MAPH34 = 170362 
45 170364 MAPL35 = 170364 
45 170366 5 = 170366 
454 170370 MAPL36 = 170370 
455 170372 MAPH36 = 170372 
456 170374 MAPL37 = 170374 
457 170376 MAPH37 = 170376 
458 EQUIV MAPLOO,MAPLO 
459 EQUIV MAPHOO,MAPHO 
460 EQUIV MAPLO1,MAPL1 
461 EQUIV MAPHO1,MAPH1 
62 EQUIV MAPLO2,MAPL2 
46 EQUIV MAPHO2,MAPH2 
464 EQUIV MAPLO3,MAPL3 
465 EQUIV MAPHO3,MAPH3 
466 EQUIV MAPLO4,MAPL4 

. 467 EQUIV MAPHO4 ,MAPH4S 
468 EQUIV MAPLOS,MAPLS 
469 EQUIV MAPHOS .MAPHS 
470 EQUIV MAPLO6,MAPL6 
471 EQUIV MAPHO6,MAPH6 
472 EQUIV MAPLO7,MAPL7 
473 EQUIV MAPHO7 7 

47% 170016 UBCR2=170016 
475 
476 
477 
«78 .SBTTL IIST REGISTER DEFINITIONS 
480 
= :: ITIST INTERNAL REGISTERS 
483 000000 PGTE = 0 : :PROGRAM-GENERATED TRANSMISSION ENABLE 

000001 PGCS = 1 : sPROGRAM=GENERATED CONTROL STATUS 

485 000002 STTE = 2 «  SANITY-TIMER TRANSMISSION ENABLE 
486 000003 STCS = 3 :: SANITY-TIMER CONTROL STATUS 
487 000004 IMSK = 4 re 
488 000005 PGF = 5 GENERATED FLAGS 
489 000006 STF = 6 = SANITY-TIMER FLAGS 
490 000007 = 7 : ;DCLO/DISCONNECT FLAGS 
491 600010 EXC = 10 XCEPTIONS 
492 000015 MTC = 15 : MAINTAINANCE CONTROL 
494 ::]IST INTERRUPT VECTOR 
495 
496 
497 -SBTTL CONSOLE SWITCH SETTINGS 
498 33 WHEN N THESE SWITCHES ARE ENABLED, IT SPECIFIES TO THE MASTER 
499 >: THAT THE CPU WITH THE IIST SELF ID CORRESPONDING TO THE 
si --EQUIVILENT BIT POSITION IS EXPECTED TO PARTICIPATE IN THIS TEST 
502 000001 CPO=BITO :CPUQ MASK LOCATION 
503 000002 CP1=BIT1 =CPU1 MASK LOCATION 


504 000004 CP2=BIT2 :CPU2 MASK LOCATION 
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13-MAR=80 16:04 CONSE SUITCH SETTINGS SEQ 0023 | 
000010 CP3=B1T3 -CPU3 MASK LOCATION 


:3 Ly FOLLOWING SWITCHES CONTROL THE EXECUTION STREAM OF THE 


000100 MPSW= BIT6 ;ENABLE FOR MULTIPROCESSOR CONFIGURATIONS 
000040 UBESW= BITS ENABLE IF UNIBUS EXERCISER IS TO BE USED 
001000 LOE= BIT9 ;ENABLE FOR LOOPING ON ERRORS 

040000 LOT= BIT14 cs FOR LOOPING ON TEST 

100000 HOE= BIT15 ;HALT ON ERROR 


-SBTTL RJPO4 DEVICE REGISTERS 
1=176700 


76700 RPCS1 ; s CONTROL AND STATUS 1 


1 = 
176702 RPWC =176702 ;;WORD COUNT REGISTER 
176704 RPBA =176704 : ]UNIBUS ADDRESS 
176706 RPDA_=176706 se ;:DESIRED SEC bo TRACK ADDRESS 
176710 RPCS2=176710 TROL AND STATUS 2 
176712 RPDS =176712 : DRIVE STATUS 
176714 RPER1=176714 ; ERROR REGISTER 1 
176716 RPAS =176716 ; ; ATTENSION SUMMARY 
176720 RPLA =176720 ; ;LOOK~AHEAD REGISTER 
176722 RPDB =176722 sé > :DATA_BUFFER REGISTER 
176724 RPMR =176724 7 ;MAINTENANCE REGISTER 
176726 RPDT =176726 -3DR VE TYPE 

6730 RPSN =176730 ;; SERIAL NUMBER REGISTER 
176732 RPOF =176732 > OFFSET REGISTER 
176734 aere =176734 ; ; s DESIRED CYLINDER REGISTER 
176736 C =176736 7;CURRENT CYLINDER REGISTER 
176740 RPERQ=1 76740 ERROR REGISTER 2 
176742 RPER3S=176742 7zERROR REGISTER 3 
176744 RPEC1=176744 ;zECC POSITION REGISTER 
176746 RPE C2=176746 ;;ECC PATTERN REGISTER 
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020064 


020000 
020064 
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-SBTTL POWER FAIL FUNCTION TABLE BIT DIF INITIONS 


NCX=B1T12 ::DON,T SAVE MM REGISTERS 

TI] =BIT11 is HE POWER FAIL 

NS =81T10 : ;DON'T PERFORM A REGISTER SAVE 
SID=BIT9 :; SEND ERROR ON ILLEGAL DOWN 
SIU=BI1T8 : SEND ERROR ON ILLEGAL UP 
SED=81T7 33 RROR DOWN 

SEU=81T ::SED ERROR ON UP 


377 SEND 
SSU=81T4 :;SEND SIGNAL ON UP. 
.SBTTL TRAP CATCHER 


.=0 
:*ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN A ‘'.+2,HALT"’ 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
; *LOCATION — O TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: .WORD 0 7;SOFTWARE DISPLAY REGISTER 
SWREG: .WORD 0 :;SOFTWARE SWITCH REGISTER 
-SBTTL ACT11 HOOKS 


EERE EAE ATER EKER AER ERE RRA ERAS 


“HOOKS REQUIRED BY ACT11 
$SVPC=. 


ve :SAVE PC 
SENDAD =:1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
“WORD ::2)SET LOC.52 TO ZERO 

=$SVPC :; RESTORE PC 


pth LOAD START AND RESTART VECTORS 


cam STRI =LOAD 200 WITH A JUMP TO START OF TEST 
JSR PC, RESTRI “LOAD 220 WITH A JUMP TO THE RESTART CODE 
MP STRT 


-SBTTL APT PARAMETER BLOCK 


© REE AEAEKEEEKRKEEEEERRAEEAAEEREEEEERE 


“SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


5 ERR REREREEREREEEREEERERERERERARAERERERRARERERRAE RARER ARR R REE 


- $X=. : SAVE CURRENT LOCATION 

=24 ::SET POWER FAIL TO POINT TO START OF PROGRAM 
200 ::FOR APT START UP 
244 :-:POINT TO APT INDIRECT ADDRESS PNTR. 
$APTHDR ;;:POINT TO APT HEADER BLOCK 
; : :RESET LOCATION COUNTER 


eee a 


SEQ 0024 


| 
| 
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-MAR-80 SEQ 0025 


CEKBGC .P11 PARAMETER BLOCK 
595 + eR AAAEAERAEAARERERAAEEEARARAERAEAEHEAEAAARAARAAREHEKRHEHHEHEHRAKES 
596 “SE TUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
red : INTERFACE SPEC. 
599 000230 SAPTHD : : 
ergy SHIBTS: .WORD 0 3:TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
601 poe 0143 SMBADR: .WORD S$MAIL- ;;ADDRESS OF APT MAILBOX (BITS 0-15) 
oe 000000 STSTM: .WORD ;;RUN TIM OF LONGEST TEST 
60 000000 SPASTM: .WORD ; RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
604 000240 000000 SUNITM: .WORD ;ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
605 000242 000052 “WORD $ETEND-SMAIL/2 ;;LENGTH MAILBOX~E TABLE (WORDS) 
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PDP-11/70 SYSTEM POWER FAIL 
15-MAR~80 16:04 COMMON TAGS 


N 
MACY1T1 3oac‘los3» 13=-MAR-80 16:04 PAGE 14 


EEA EAAAAEKEARAAREERAHERARKARK AAA 


“RTHIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
>*USED IN THE PROGRAM. 


SCMTAG: 
STSTNM: . 


SERFLG: . 


SICNT: 


SLPADR: 
SLPERR: 


SERTTL: 


SITEMB: 
SERMAX : 
SERRPC : 
SERRSP: 
SGDADR: . 


SBDADR: . 


-=14000 


DODO OCOCCOSCO000 - | |] “DOCS OOOVDOSCOOOSOOSSSCOSOOSOOOCOooooe 


;:START OF COMMON TAGS 


3; CONTAINS 


: CONTAINS 


: ; CONTAINS 


3; CONTAINS 


;; CONTAINS 


3; CONTAINS 


; ; CONTAINS 


; CONTAINS 


7; CONTAINS 


7 CONTAINS 


7; CONTAINS 


;; CONTAINS 


THE TEST NUMBER 


ERROR FLAG 


SUBTEST ITERATION COUNT 


SCOPE LOOP ADDRESS 


SCOPE RETURN FOR ERRORS 


TOTAL ERRORS DETECTED 


ITEM CONTROL BYTE 


MAX. ERRORS PER TEST 


PC OF LAST ERROR INSTRUCTION 


SP OF CPU IN ERROR 


ADDRESS OF *GOOD* DATA 


ADDRESS OF *BAD' DATA 


SEQ 0026 
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16:04 COMMON TAGS SEQ 0027 


000000 -WORD 0 
000000 -WORD 0O 
000000 SGDDAT: .WORD 0 :: CONTAINS ‘GOOD’ DATA 
-WORD O 
WORD 0 
-WORD 0 
000 SEOPSG: .BYTE 0 :; THIS TABLE HOLDS THE END OF PASS 
000 -BYTE O 
000 -BYTE O 
000 BYTE O 
000000 SBDDAT: .WORD 0 : CONTAINS ‘BAD’ DATA 
000000 .WORD 0 
000000 .WORD 0 
000000 «WORD 0 
000000 -WORD 0 : sRESERVED=-NOT TO BE USED 
000000 -WORD 0 
000 SAUTOB: .BYTE 0 ;; AUTOMATIC MODE INDICATOR 
000 SINTAG: .BYTE C :; INTERRUPT MODE INDICATOR 
100008 SWR : -WORD DSWR : ;ADDRESS OF SWITCH REGISTER 
177570 -WORD DSWR 
177570 . WORD DSWR 
177570 -WORD DSWR 
177570 DISPLAY: .WORD DDISP : :ADDRESS OF DISPLAY REGISTER 
177570 «WORD DDISP 
177570 ~WORD DDISP 
177570 -WORD DDISP 
013776 SSSTP: .WORD STACK +3 STACK INITIALIZATION FOR me 
011776 «WORD STACK-2000 : : * CPU 
007776 -WORD  STACK-4000 fits iy v=+ CUD 
003776 . WORD STACK-10000 Z ar "** cPuSs 
177560 $TKS: 177560 -TTY KBD STATUS 
177562 $TKB: 177562 :TTY KBD BUFFER 
177564 $STPS: 177564 : TTY PRINTER STATUS REG. ADDRESS 
177566 STPB: 177566 :: TTY PRINTER BUFFER REG. ADDRESS 
000 SNULL: .BYTE 0 ; = CONTAINS NULL CHARACTER FOR FILLS 
002 SFILLS: .BYTE 2 :CONTAINS # OF FILLER Ie age gh ge REQUIRED 
012 SFILLC: .BYTE 12 :3 INSERT FILL CHARS. AFTER A “LINE FEED 
000 STPFLG: .BYTE Q ::" TERMINAL AVAILABLE’ FLAG (B81 T<07>=0=YES) 
alata SERGSL: .WORD 0 
1 7 SCPUID: .WORD -1 :; THIS TABLE HOLDS THE PHYSICAL ID OF 
177777 WORD -=-1 :: THE PARTICIPATING PROCESSORS ARRANGED 
177777 -WORD -1 :: IN LOGICAL ORDER. 
177777 -WORD <j 
000000 SREGAD: .WORD 0 ; CONTAINS re , memes FROM 
sWHIC (SREGO) WAS OBTAINED 
sisi en 000000 000000 SREGO -WORD 0,0,0,0 : CONTAINS ( (SREGAD) +0+6) 
000000 000000 000000 SREG1: .WORD 0,0,0.0 >: CONTAINS ((SREGAD)+2+6) 
000000 000000 000000 S$REG2: .WORD 0,0.0,0 : CONTAINS ((S$REGAD) +4+6) 
000000 000000 000000 S$REG3: .WORD 0,0,0.0 : :CONTAINS (($REGAD) +6+6) 
000000 000000 000000 S$REG4 WORD 0,0,0,0 >: CONTAINS (($REGAD) +10+6) 
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-P11 “MAR-80 16:04 COMMON T 


AGS 
STMPO: .WORD 
STMP1: .WORD 
STMP2: .WORD 
STMP5: .WORD 
STMP4: .WORD 
SESCAPE :0 

. WORD 

. WORD 

. WORD 
SQUES: .ASCII 
SCRLF ASCII 
SLF : ASCIZ 


C 
MACY11 soa fos>> 15-MAR-80 16:04 PAGE 16 


; R DE 
ESCAPE ON ERROR ADDRESS 


;;QUESTION MARK 
ie bear. RE TURN 
NE FEED 


PTTTTII TITTLE LLL LLL Lett 


“SBTTL APT MAILBOX=E TABLE 


SF RAARAAARAERAAAERAERAERAEAAERAERAREARARRRRARRAARRAERERERAERERARRE EAS 


:;APT MAILBOX 


PEEEEEEE 


AMAMS 
AMTYP1 


; : SENVI 


CPU T 


YPE, 
bits IS-115¢PU T YPE 
1/04=01,11/05=02,11/20=03.11/40=04,11/45=05 

-PDQ=07 ,=10 


17 
IT 10=RE 


MOD 
¢ APT ye REGISTER 
R By HES 


hg 


ea 


TI 


8 AL TIME CLOCK 

tH 9=FLOATING POINT _ 
BIT 8=MEMORY MANAGEMENT 

; HIGH oe SS.M.S. BYTE 


MEM.TYPE BYTE =~ 
900 NSEC C 


(HIGH BYTE) 
=001 


300 NSEC BIPOLAR=002 
500 NSEC mOS=005 
: HIGH ADDRESS .BL 


T ADDR. = ayTEs, .THIS WORD AND LOW OF ‘'TYPE’* ABOVE 


LAST 
ent ADDRESS M.S. BYT 
M.TYPE BL 
::MEM.LAST ADDRESS ,BLKA#2 


HIGH 
: > MEM. 


M.LAST Ka3 
: HIGH ADDRESS M.S .BYTE 


YPE ,BLK# 
> :MEM.LAST ADDRESS .BLKA4 


ADDRESS .M.S.BYTE 
TYPE .BLK#S 


ADDRESS .BLKA4 
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T MAILBOX-E TABLE SEQ 0029 
77% 01 000000 SVECT1: .WORD AVECT1 ;:: INTERRUPT VECTORA1 BUS PRIORI T v4" 
775 014410 000000 SVECT2: .WORD AVECT2 :: INTERRUPT VEC TORAZSUS. PRIORI TY#2 
776 014412 000000 SBASE: .WORD ABASE  ;;BASE ADDRESS OF EQUIPMENT UNDER TEST 
14414 000000 "WORD ADEVM ICE MAP 
778 014416 000000 $CDW1: “WORD ACDW1 <2 CGNTROLLER DESCRIPTION WORD#1 
779 014420 000000 $CDW2: .WORD ACDW2 ::CONTROLLER DESCRIPTION WORD#2 
780 014422 000000 “WORD ADDWO 3 ;DEVICE DESCRIPTOR WORDAO 
781 014424 000000 $DDW1: .WORD ADDW1 ::DEVICE DESCRIPTOR WORDA1 
780 014426 000000 $D “WORD  ADDW2 : :DEVICE DESCRIPTOR WORDA2 
783 014430 000000 SDDW3: .WORD ADDW3 ::DEVICE DESCRIPTOR WORD#3 
784 014432 000000 "WORD ADDW4  ::DEVICE DESCRIPTOR WORDA4 
785 14434 000000 $DDWS: .WORD ADDWS $ :DEVICE DESCRIPTOR WORDAS 
14436 000000 “WORD ADDW6 =; DEVICE DESCRIPTOR WORDA6 
787 014440 000000 $DDW7: .WORD ADDW7 ICE DESCRIPTOR WORDA7 | 
788 014442 000000 “WORD ADDWB =: :DEVICE DESCRIPT 
789 14444 000000 “WORD ADDWS = :DEVICE DESCRIPTOR WORD#9 | 
0 000000 $DDW10: .WORD ADDW1O0 ;;DEVICE DESCRIPTOR WORD#10 
791 014450 000000 $DDW11: .WORD ADDW11 ;;:DEVICE DESCRIPTOR WORDA#11 
798 014452 000000 2: .WORD ADDW12 ::DEVICE DESCRIPTOR WORDA12 
793 014454 000000 $DDW13: .WORD ADDW13 ;;DEVICE DESCRIPTOR WORDA13 
794 014456 000000 $DDW14: .WORD ADDW14 ;:DEVICE DESCRIPTOR WORDA14 
795 000000 $DDW15: .WORD ADDW15 :;DEVICE DESCRIPTOR WORDA15 
797 
798 014462 SETEND: 
800 014462 000000 000000 000000 sTOP: 0.0.0.0,0.0.0,0 -MEM BOX UPPER BOUND ADDRESS TABLE 
801 000000 000000 000000 
802 014476 000000 000000 
80 014502 000000 000000 000000 START: 0,0,0.0.0:0.0.0 :MEM BOX STARTING ADDRESS TABLE 
804 014510 000000 000000 000000 
805 014516 000000 000000 
806 014522 000000 PWRFL: 0 :=0 DON'T EXPECT CPU POWER FAIL.=1 EXPECT IT 
807 014524 000000 YYY 0 “ERROR ROUTINE WORK LOC 
808 014526 000000 T: 0 :=0 DON'T EXPECT CPU BOOT, =1 EXPECT IT 
809 014530 000000 PATCHK: 0 =0 WRITE AND CHECK MEM PATTERN,=1 CHECK ONLY 
810 014532 000000 HICORE: 0 *=1 TURN ON MM ON POWER-UP | 
811 014534 000000 RELOUP: 0 *=0 DON'T RELOCATE,=1 RELOCATE 
B12 014536 000000 RELODN: 0 *=0 DON'T RELOCATE.=1 RELOCATE 
813 014540 000000 0 _ "T EXIT, =1 EXIT TEST 
814 014542 000000 ENTR22: 0 “CONTROL ENTRY INTO TEST 22 
815 014544 000000 ENTR23: 0 “CONTROL ENTRY INTO TEST 23 
816 014546 000000 ENTR24: 0 “CONTROL ENTRY INTO TEST 24 
817 014550 000000 HIBOX: 0 :RELOCATE TO THIS MEM BOX 
818 014552 000000 000000 000000 SAVRG: 0.0.0.0 A PLACE TO SAVE A REGISTER 
819 014560 000000 
820 014562 000000 000000 000000 ROUTE: 0.0.0.0 - TYPE TRAP ROUTE TABLE 
821 014570 000000 
B5¢ 014572 000000 000000 000000 SAV6: 0.0.0.0 :SOME PLACE TO PUT THE SP 
824 014600 000000 
825 014602 000000 000000 000000 FLAG: 0.0.0.0 : INSTRUCTION DOWN FLAG 
826 014610 000000 
827 014612 000000 000000 000000 PFFT: .wORD 0.0.0.0 -:POWER FAIL FUNCTION TABLE 
828 014620 000000 
829 014622 000000 000000 000000 PFDT: .wORD 0,0,0,0 ::POWER FAIL DURATION TABLE 
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T MAILBOX-E TABLE 
MBDSW: .WORD 0,0,0,0 7 7MASSBUS DEVICE SELECTION WORD 
SIGNAL: 0 :POWER ROUTINE SIGNAL 
SLVID: .WORD 0 *:THIS WORD HOLDS ACTUAL LOG. ID. 
BO : ,.WORD 0 :NUMBER OF BOXES OF MK11 MEMORY 
CKSUM: .WORD 0,0.0,0 : CHECKSUM TABLE 
SPSWR: .WORD 0 :PSEUDOSWITCH REGISTER 
PWRTAB: .WORD 0,0,0,0 :POWERFAIL DISPATCH TABLE 
ISTTAB: .WORD 0,0,0,0 :]IST DISPATCH TABLE 
ERRTAB: .WORD 0,0,0,0 :CPU ERROR VECTOR DISPATCH TABLE 
SYNC.1: .WORD 0 7 SEMAPHORE 
SYNC.2: .WORD 0 : SEMAPHORE 
TYPQUE: .BLKW 1000 “MESSAGE POINTER AREA 
S2L0G1: .WORD 0 LOG-IN LOCK 
S2L0G2: .WORD 0 LOG-OUT LOCK 
C1: -WORD 0 1 ASF ORK CONTROL VARIABLES 
C2: «WORD 0O 
D1: -WORD 0 
D2: .WORD 0 
E1: Q - 
E2: 0 
FLAGS: .BYTE 0O 
MPF : BYTE 0 oa FLAG 
UBEF : -WORD 0O ;UBE F 
RPPGM: .WORD 0.0,0.0 s SHARED RPO4 DRIVE TABLE 
LOOPS: .WORD 0 :# OF LOOPS REQUIRED ON POWER DOWN 
COUNTO: O : TIME CPU POWER-DOWN 
COUNT1: 0 
COUNT2: 0 
COUNTS: 0 
LOG1: -WORD QO ;ENTRY CONTROL LOGS 
LOG2: «WORD OQ 
CPULS1: .WORD 0 :NUMBER OF ACTIVE SLAVE CPU'S 
EXTRA: 0 “EST. INITIAL PART OF PWR DWN TIME 
CPUACT: 1 sCPUS UNDER TEST 
SYNC.3: 1 : SEMAPHORE 
INTMSK: 1 :ITIST INTERRUPT ENABLE BIT 
ERRLCK: 1 :ERROR ROUTINE SEMAPHORE 
at :-A-FORK CONTROL VARIABLES 
E3: 1 
NOPRMP: 1,1,1,1 :=1 DON'T TYPE CPU IDENTIFICATION 
UBELCK: 1 ;UBE SEMAPHORE 
TQL1: 1 : TYPE SEMAPHORE 
S2L1 .WORD 1 * INITIALIZATION SEMAPHORE 
ACR: 177500 :ITIST ACCESS CONTROL REGISTER 
ADR: 177502 11ST ACCESS DATA REGISTER 
ISTVEC: 260 -JIST INTERRUPT T 


FIRST: 


VECTOR 
-WORD -1 : INCREMENTED BY EACH PROCESSOR 
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CEKBGC .P 13-MAR=80 1 T MAILBOX~E TABLE 
BMSK:  .WORD 400 - 11ST INIT T MASK 
os? 1 O31 366 061266 071266 BFADR: “WORD — DSKBUF ,DSKBUF +10000,DSKBUF +20000, DSKBUF + 30000 
589 01 ist 000400 000400 YELLIM: .WORD 400,400,400,400 
891 017062 Pur: ot CPU UNDER TEST 
g 01 177777 TYPLCK: “ERROR/TYPE SEMAPHORE 


+4, 017066 006405 . FACTOR: 20000. -/6 :POWER DWN FACTER 


ac 


SEQ 0031 


;MASSBUS TRANSFER BUF AR 
; YELLOW ZONE BOUNDARY 
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6:04 ERROR 


POINTER TABLE 
.SBTTL ERROR POINTER TABLE 


:*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
:* INFORMATION IS OBTAINED BY USING 


THE THE INDEX NUMBER FOUND IN 
: sLOCATION $ITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 


IF SITEMB IS O THE ONLY PERTINENT DATA IS (SERRPC). 

* *NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOwS: 
:* EM :POINTS TO THE ERROR MESSAGE 
:* DH «POINTS TO THE wn HEADER 
;* DT ::POINTS TO THE DAT 
;* DF ::POINTS TO THE DATA FORMAT 
SERRTB: 

sc; 1TEM 1 

EM1 ; UNEXPECTED POWER FAILURE ON CPU 

DH10 -TESTNO ERRORPC 

ha > $TSTNM, SERRPC 

sc ITEM 2 

ee : UNEXPECTED POWER UP SEQUENCE ON CPU 

0 

0 

sc ITEM 3 

: ILLEGAL POWER DOWN SEQUENCE 

0 

0 

ss ITEM 4&4 

. s ILLEGAL POWER UP SEQUENCE 

0 

0 

sstTER. 5 

EMS ; UNEXPECTED TRAP TO LOCATION 4 

DHS PID  ERRORPC CPUERR 

Me “ $REGO, SERRPC. SREG1 

si; ITEM 6 

EM6 : UNEXPECTED TRAP TO Lm 

DH5 :PID ERRORPC CPUERR 

DT5 

0 

s: 1TEM 7 

: UNEXPECTED TRAP TO 114 
DH7 -PID ERRORPC CPUERR MEMERR 
‘‘’ = $REGO, SERRPC , SREG1. SREG2 


az 
é 


SERERESSISSISISS 
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10 


13 


14 


16 


17 


20 


soon ss ON THE STACK IS WRONG 
ERRORPC 


; TESTNO 
: STSTNM, ERRORPC 


D PS IS WRONG 
TivO 


S ERRORPC 
STNM, SERRPC , $REGO 


PS 


;ODD ADDRESS TRAP FAILED 


;MEMORY CORRUPTED ON POWER FAIL 


; TIMEOUT TRAP — . 


; TESTNO 


ERRORPC 
:STSTNM,SERAPC, SREGO 


7POWER FAIL RETURNED TO SOON 


:NOT ENOUGH OR TOO MABY INSTRUCTIONS EXECUTED 


;NO MEM. MANG. VIOLATION OR TRAP TO 4 


:NO_IIST er yl 
;TESTNO [STI 
> $TSTNM, SREGO, SREG 


ACR PG 
1 “SREG2. OSREG3 


CS 


SEQ 0035 


at 
é 


gs 


Se CPONteeEe 
C000 


(oe elelela)l si =i ele) 
em a ed wd oe eed wd 


oo 


ooo°o 


PSLSSLSLVS 


ee eee ee Le ee 


ooo 
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PDP=1 | 
16:04 ERROR POINTER TABLE SEQ 0036 | 
EM21 : INCORRECT BRK AND/OR DCF FLAGS 
DH21 “TESTNO ISTID FOUND SHOULD BE 
pret = $TSTNM, SREGO, $REG1, $REG2 
s:1TEM 22 
EM22 :CPU DID NOT TRAP TO 24 
DH22 “TESTNO ISTID ERRORPC 
pice :$TSTNM, $SREGO, SERRPC 
:;1TEM 23 
cn : CHECKSUM ON MASSBUS TRANSFER IS WRONG 
DT22 
>: ITEM 24 
EM24 -NO POWER FAIL ON CPU 
DH10 -TESTNO ERRORPC 
DT10 > $TSTNM, SERRPC 
sr ITEM 25 
EM25 :UNEXPECTED CPU INTERRUPT 
DH10 :TESTNO ERRORPC 
110 > $TSTNM, SERRPC 
ia .=20000 ::LOAD CODE ABOVE THE FIRST 4k (WORDS) 
016774 * MOV #CPUACT, Rs :RESET THE VARIABLES 
000001 1$: MOV #1 (R4&)+ 
017026 CMP WS2L1, R4 
BHIS  1$ 
014462 MOV #STOP, R4 
2s: CLR (R4)+ 
016772 CMP WEXTRA, R4 
BHIS 2$ 
177777 017036 MOV f-1 FIRST 
000400 017040 MOV #400,  BMSK 
177777 017062 MOV #-1,  PuT 
177777 017064 MOV #1, TYPLCK 
Ri. PC RE TURN 
014200 STRT: MOV $$STP, SP : INITIALIZE THE STACK 
014226 MOV #SCPUID,RS -:GET ADDRESS OF CPUID TABLE 
000004 MOV :: INIT COUNTER 


#4R 
177777 4$: MOV #-1,(R4)+ “INIT TABLE WITH -1°S 
SOB R3,4$ 
-- INITIALIZE A FEW VECTORS 


Geeees “s ~ 
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$44722 
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000030 


000004 
014702 
016737 


000004 
014702 


014660 


173514 
173504 


40$: 


50$: 


20$: 


25$: 
30$: 


31$: 


41$: 


42$: 
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POINTER TABLE SEQ 0035 
MOV #SERROR ,@#EMTVEC sEMT VECTOR FOR ERROR ROUTINE 
CLR aFVEMTVEC+2 :FLEVEL LO 
MOV ASTRAP ,a@&#TRAPVEC 38 re VECTOR FOR TRAP CALLS 
CLR @FTRAPVEC+2 ;7LEVEL 
7A .—<-" Be | y POWER FAIL DISPATCH ROUTINE 

+ tps 
MOV #25$ ,AMERRVEC PU ERROR VECTOR INCASE SWR IS'NT THERE 
MOV TYPQUE +4, TYP >: INITIALIZE REAR POINTER 
MOV ATYPQUE +4, TYPQUE +2 :; INITIALIZE FORWARD POINTER 
te wy :;;SET ID IN DISPLACEMENT REGS. 
CMP ase, av46 ;UNDER ACT AUTO MODE? 
BEQ 40$ :BRANCH IF YES 
TYPE 11 Z 
V #177570, SWR :;SET SWR 
BITB MAPTSIZE, SENVM oe UNDER APT? 
BEQ 50$ H IF NO 
MOV ASSWREG, SWR «USE APT SWITCH REG 
BIT AMPSW ,aSWR >: 1S HARDWARE SWITCH REG. aad AND MP SET? 
BNE 20$ ;;SWR IS THERE AND MP IS SET 
BEQ 30$ :;SWR IS THERE BUT MP IS NOT SET. 
MOV MERRDIS ,A#ERRVEC ; RESET CPU ERROR VECT 
MOV ACPUER, ERRTAB(RO) :;FLAG ALL UNEXPECTED TRAPS TO 4 
MOV ASSWREG, SWR :: SETUP FOR SOFTWARE SWITCH REG 
MOV #D1SPREG, DISPLAY 
BIT AMPSW, aSWR 215 MP SWITCH SET IN SOFTWARE SWITCH REG? 
BEQ 30$ NOPE . 
MOV #ERRDIS ,A#ERRVEC ; :RESET ERROR VECTOR 
MOY ACPUER, ERRTAB(RO) ZZFLAG ALL Sy i TRAPS T0 4 
BIS8 #B1TO MPF 3: SET THE MP FLAG. 
: LET'S GO 

ADD #4, (SP) :: SKIP RETURN 
RTI : RETURN FROM TRAP 
MOV #ERRDIS ,@#ERRVEC ae Y ERROR VECTOR 
MOV #CPUER, ERRTAB(RO) FLAG ALL UNEXPECTED TRAPS TO 4 
CLRB MPF :: CLEAR THE MP FLAG 
TYPE M7 UNIPROCESSOR MODE IS IN EFFECT) — 

42$ : ENTER INTO NON MP EXECUTION STREAM 
TYPE 16 TIPROCESSOR MODE IS IN EFFECTIJ 
MOV aSWR , SPSWR = SET UP PSEUDO SWITCH REGISTER. 
MOV ASWR.R4 ;:POINT TO SWR TABLE 
MOV a, ; 3 SET COUNTER 
MOV #SPSWR , (RS) + sel LOAD THE SLAVE SWITCH REG. POINTERS 
SOB sR. 418 :LO0P TILL DONE 
TYPE ,1M2 3° ‘SWITCH ap = 
MOV aSwR ,- (SP) ; «SAVE @aSWR FOR T PPECUT 
TYPOC :G0 ae ASCIIC(ALL DIGITS) 
TYPE -SCRLF - - TYPE CRL 
TYPE ,SCRLF 
BIT #UBE SW, aSWR ; «UBE SWITCH SET? 
BEQ 3$ TU 
BIT #SWO7, aSWR : WILL eerie 1 BE SKIPPED? 
BNE 3$ ;;BRANCH IF _Y 7 
TYPE 14 -¥- SRS EXERCISER WILL BE USED) 
INCB UBEF 3; SET UBE FLAG 


x 
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P11 13-MAR-80 16:04 ERROR ABLE 
1119 020466 65$ ? 
1120 020470 104401 040765 43$: M5 i: CUNIBUS EXERCISER WILL NOT BE USED) 
1121 020474 105037 016740 UBEF *CLEAR THE UBE F 
1128 020500 105737 016737 65$: MPF : 7M TIPROCESSOR MODE IN EFFECT? 
1 00100 55$ CH IF Y 
11g 020506 000137 021076 MP STO “START SETTING UP VECTORS 
1125 _SBTTL BOOT AND INITIALIZE THE SLAVE CPUS 
1126 920512 17702 173442 55$: MOV aSwWR,R2 =: COPY SWITCH REGISTER INTO R2 
17 516 012737 000001 016774 #\,CPUACT "RESET # OF ACTIVE CPUS 
1128 4 052777 100000 176276 #B1T15,aACR *: INITIALIZE THE IIST. 
1 9 01 705 002000 MOV #2000,R5 “LET IT SETTLE AFTER INIT 
1131 020540 012777 000001 176262 81$: MOV #1,aACR i ACCESS PGCS REGISTER 
113 546 032777 004000 175256 BIT #B1T11,@ADR -:1S IT READY 
1133 020554 001771 BEQ 81$ 33 ET 
1134 020556 017705 176246 MOV @ACR_RS *=COPY ACR T 
1135 020562 072527 177770 ASH #-10.R *:CREAT PHYSICAL ID 
1136 020566 104401 041665 TYPE ,1M76 :: IDENTIFY THE MASTER 
1137 020572 010546 V R5, -(SP) 
1138 020574 05 TYPDS 
1139 020576 010537 014226 MOV R5,$CPUID ;3SET SELF ID OF MASTER IN TABLE 
1140 020602 005000 CLR RO -:REGO. CONTAINS WORD DISPLACE- 
1141 *>MENT INTO CPUID TABLE *** 
1142 020604 005001 CLR R1 2IRI CONTAINS THE BYTE DISPLACEMENT.... 
1143 :THE TRUE LOGICAL 
1144 020606 012777 000007 176214 MOV #DCF ,QACR = ACCESS DCF REGISTER OF IIST 
1145 020614 017703 176212 MOV @ADR.R3 ;:COPY DCF INTO R3 
1146 020620 072327 177770 ASH #-10, NG BRK MASK INTO POSITION 
1167 020624 012777 021140 176202 MOV asi VENT. @ISTVEC «SET ENTRY POINT FOR SLAVES 
1149 020632 005004 CLR R4 ::R4 CONTAINS THE DECIMAL VALUE 
1150 *:OF THE SELF ID OF THE CPU UNDER 
1151 :; INTEROGATION. 
1152 020634 032702 000001 1$: BIT #31T0,R2 >=DO WE WANT THIS CPU? 
1153 020640 001471 BEQ 2$ : =NO, CONT INUE 
1154 020642 032703 000001 BIT #BITO.R3 3318 IT ALIVE? 
1155 020646 001413 BEQ $ YE 
1156 020650 010437 014310 MOV R4.STMPO *>SAVE CONTENTS OF R4 
1157 020654 104401 014335 TYPE »SCRLF :3NO,CRLF 
1158 020660 104401 041176 TYPE ™™11 -:"CPU @ 
1159 020664 013746 014310 MOV $TMPO,-(SP) *>SAVE $TMPO FOR TYPEOUT 
1160 020670 104405 TYPDS ::G0 TYPE--DECIMAL ASCII WITH SIGN 
1161 020672 104401 041207 TYPE _T™M12 :3" ‘SPECIFIED BUT NOT ACTIVE" 
116¢ 920676 020437 014226 82$: CMP R4,$CPUID *:1S THIS THE MASTER? 
1163 0 001450 BEO 2$ >:YES, I 
1164 020704 012737 020.40 000000 MO. 8 “M9315MP MOVES a#0 TO SP ON BOOT 
1165 712 012777 000000 176110 MOV #PGTE ,@ACR = ACCESS PGTE REG. 
1166 020720 013777 017040 176104 MOV BMSK ->SET TO BOOT AND THEN... 
1167 020726 052777 000001 176076 BIS #8110, aADR : :BOOT C 
1168 020 012701 000200 MOV #200, 1 *:SET UP A LONG DELAY (5 SEC) 
1169 020740 077001 70$: $38 RO, 
1170 020742 077102 SOB R1. 70$ 
1171 020744 012777 000001 176056 83$: MOV #PGCS. @ACR  :CHECK FOR IIST READY 
117 020752 032777 004000 176052 BIT #BIT11. @ADR 
1173 020760 001771 BEQ 83$ :BRANCH IF NOT 
1174 020762 005077 176042 84S: CL @ACR > =RESET ACR (POINT TO PGTE) 
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P11 1 “80 16:04 BOOT AND INITIALIZE THE SLAVE CPUS SEQ 0037 
020766 013777 017000 176036 MOV INTMSK , @ADR ::SET UP TO INTERRUPT 
4 932777 1 176030 BIS #B1T0,3ADR >:GO!, INTERRUPT SLAVE 
1002 005237 016774 INC CPUACT *COUNT ANOTHER ACTIVE CPU 
1006 01 176014 85$: MOV #PGCS,a@ACR ::CHECK FOR IIST READY 
1014 032777 004000 176010 BIT #B1T11,@ADR 
1022 001771 BEQ 85$ 
1024 27 000003 2$: CMP R43 ::ALL CPUS STARTED? 
10 e010 BGE 3$ :sYES 
10 00 INC RS + NEXT CPU TO ATTEMPT TO 800T 
19 é ASR R2 = =NEXT SWITCH REG. BIT 
1036 ASR R3 + *NEXT BIT TO SET 
021040 37 017040 ASL K 33 T 
021044 006337 017000 ASL INTMSK *:NEXT INTERRUPT MASK 
021050 71 BR ::GO TRY ANOTHE 
021052 052737 001000 177746 3S: BIS #B1T9, CONTRL ;SET CACHE BYPASS 
021060 005037 000000 CLR a0 sRESTORE LOC. 0 
021064 013737 016774 016770 MOV CPUACT,CPULS1 
021072 005337 016770 DEC CPULS1 :CONTAINS # OF ACTIVE SLAVE CPU'S 
.SBTTL INITIALIZE THE COMMON TAGS 
::CLEAR THE COMMON TAGS (SCMTAG) AREA 
021076 052737 000014 177746 STO: BIS #14, CONTRL ;DISABLE CACHE 
021104 012706 014000 MOV ASCMTAG, RO ::FIRST LOCATION TO BE CLEARED 
021110 005026 CLR (R6)+ +:CLEAR MEMORY LOCATION 
021112 022706 014160 CMP #SWR,R6 ;;DONE? 
021116 1374 BNE F :ZLOOP BACK IF NO 
0211 013706 014200 MOV $$STP,SP ::SETUP THE STACK POINTER 
021124 013737 035446 035434 MOV SENDCT,SEOPCT ::SETUP END-OF-PROGRAM COUNTER 
0211 005037 014344 CLR :: CLEAR PASS COUNT 
0211 32 BR MSTENT 
O54146 SLVENT: 
1140 052737 1000 177746 BIS #BIT9,@#CONTRL ;;TURN OFF CACHE 
oot 188 237 014644 INC SLVID > :CREATE CPUID 
021152 013701 014644 MOV SLVID,R1 >:AND MOV TO R1 
031136 010100 MOV R1.RO 
1160 ASL RO ::CREATE WORD INDEX INTO CPU TABLE 
O51 10¢ 017705 175642 MOV @ACR, R5 -:COPY ACR 
021166 072527 177770 ASH #-10, R5 23 THE ID 
1172 010560 014226 MOV RS,$CPUID(RO) ::SET SELF-ID INTO TABLE 
1176 052777 100000 175624 BIS #81T15,aACR >:RESET THE IIST 
1204 012777 000001 175616 MOV #PGCS, @ACR :ENABLE INTERRUPTS 
1212 052777 000004 175612 BIS #BIT2, @ADR 
Oei¢ 0 005037 177776 po CLR aePsw ::LOWER PROCESSOR PRIORITY 
021224 005060 014322 CLR SESCAPE (RO) ::CLEAR THE ESCAPE(RO) ON ERROR ADDRESS 
021230 01 021242 014032 MOV 10$ (RO) , SLPERR(RO) -:SETUP FOR THE ERROR LOOP ADDRESS 
021236 000170 021252 JMP af ORKTB(RO) -:DISPATCH THE FOLLOWERS 
021242 021450 10$: TST1 
021 021450 TST1 
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CEKBGC.P INITIALIZE THE COMMON TAGS SEQ 0038 
1231 021246 021450 TST1 
1¢32 021250 021450 TST1 
1 021252 02134 FORKTB: MSO 
1 021254 021 SL1 
1235 021256 021 SL2 
1g 021 02132 SL 3 
1 021 016006 014200 SL1: MOV S$$STP(RO).SP |: ; INITIALIZE SLAVE STACK (CPU1) 
1 1 1 WAIT = WAIT FOR MASTER TO START VIA INTERRUPT 
1 1 052 100000 175532 BIS #B1T15,@ACR = =RESET THE IIST 
1240 021276 000137 021450 JMP 
1261 1302 016006 014200 SL2: MOV S$$STP(RO).SP |: ; INITIALIZE SLAVE STACK (CPU2) 
1 4@ 021 1 WAIT ::WAIT FOR MASTER TO INTERRUPT 
124 1310 05 100000 175512 BIS #B1T15.@ACR : “RESET THE IIST 
1244 021 1g 137 021450 JMP 
1245 021 016006 014200 SL3: MOV $$STP(RO).SP  :: INITIALIZE SLAVE STACK (CPU3) 
1246 021 WAIT ::WAIT FOR MASTER TO INTERRUPT 
1247 021 052777 100000 175472 BIS #B1T15,@ACR = =RESET THE IIST 
1248 021336 000137 021450 MP TST1 
1249 021342 105737 016737 MSO: TSTB = MPF ::MP MODE? 
1250 021346 001440 BEQ BEGIN *=NO,DON'T TRY TO INTERRUPT CPUS 
1251 021350 013702 017034 MOV ISTVEC, R2 “SET UP RETURN FROM INTERRUPT 
125¢ 021354 062702 2 ADD 
125 021360 010277 175450 MOV R2, @ISTVEC 
1254 021364 012712 2 MOV He, 
1255 021370 0127 175432 MOV #PGTE .@ACR :ACCESS PGTE REGISTER 
1 021376 017702 172556 MOV aSWR,R2 “GET COPY OF SWR 
1257 021402 042702 177760 BIC #177760,R2 “KEEP ONLY THE CPU MASK 
1258 021406 010277 175420 MOV R2,@ADR “SET THE INTERRUPT BITS 
1259 021412 032737 016774 BIT #BITO,CPUACT  ;:EVEN OR ODD? 
1260 021420 001404 BEQ 7$ “BRANCH IF EVEN 
1261 021422 012777 000005 175402 MOV #5, @ADR *GO WITH NO PARITY.ENABLE INTERRUPTS 
1262 021430 000403 BR 4$ 
1263 021432 012777 000007 175372 7S: MOV #7,@ADR :GO WITH PARITY. ENABLE INTS. 
1264 021440 000001 4$: WAIT “WAIT FOR LIST TO INTERRUPT 
1265 021442 052777 100000 175360 BIS #B1T15,@ACR *=RESET THE IIST 
1266 021450 BEGIN: 
1267 
1268 
1269 
1270 
1271 
1272 
127 
1274 
1275 
1276 
1277 
1278 
1279 
1280 
1281 
1282 
1283 
1284 
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P11 INITIALIZE THE COMMON TA SEQ 0039 


FL RRR A REAR AERA EERE R REAR EERE ERATE ATTA REAR 
2 RARER EAR EAE EEA AERA RAE EEA EAE ETAT RA 
fT Aaa aaaKeeaREe (RR RRR SASL SS SSS SS | 
pyeewanannenee SEC T1ON ONE KeRERKAREE eRe 
sp eeaaneekanee ReRKKRKEREeR HEH 
2 SRR AERE REAR EER REE EE EERE ERE REE EERE EEE ERE EERE RAE RE HH 
FRR EAA AERA EE EERE AAR REE EERE EERE ERR EERE EEE ee 


5 REAR A EERE EAE EEE EEEEAEAAARAARRERA AREER EERER ERE EAR 


s*TEST 1 SIMPLE DOWN/UP TEST (KERNAL) 
SL RARER EEEEERERREAERAERRERRRRERERERE REE RERER REAR ERED 

021450 TST1: 
021450 012777 000001 172512 MOV #1, @DISPLAY :SET TEST NUMBER 
021456 012737 033774 014662 MOV APOWDWN , PWRTAB ;SET UP POWER DOWN VECTOR 
021464 012737 033340 000114 MOV #PARERR, @4CACHVEC sSET PARITY ERROR VECTOR 
021472 012737 000001 033342 MOV #1, @4PARFLG :SET MULTI PARITY ERROR INDICATOR 
021500 012737 040606 000024 MOV #PWRDIS ,@APWRVEC sSET LOC 24 
021506 005037 000026 CLR a4PWRVEC+2 sSET LOC 26 
021512 032770 000200 014160 BIT #SWO7, @SWR(RO);:SKIP SECTION 1? 
0215 001402 BEQ 1$ 5 CH IF NO 
021522 1 024220 JMP SEC2 sELSE GO TO SEC2 
0215 5700 1$: TST RO :IS THIS THE MASTER? 
0215 001011 BNE 4$ :BRANCH IF NO 
021532 104401 041605 TYPE TM14 : ENTERING SECTION 1°° 
021536 105737 016740 TSTB UBEF :USING THE UBE? 
021542 001004 BNE 4$ : H IF YES 
021544 104401 041241 TYPE M13 sPRINT INSTRUCTIONS 
1230 104401 014333 ‘i TYPE SCRLF 
021554 005037 177776 CLR aFPSs ;SET KERNAL MODE 
021560 012703 021616 MOV #23 R35 :SET POWER UP RETURN 
021564 105737 016740 TSTB UBEF : ;USE UNIBUS EXERCISER? 
021570 001407 BEQ 64$ zs CH IF NO 
021572 37 017022 ASRB UBELCK :LOCK OUT OTHER CPUS FROM PROCEEDING 
021576 103575 BCC 4 
0 103 000241 CLC 
6 1006 052737 000020 170016 ue BIS WBIT4,QMUBCR2 ;;SET TO POWER FAIL 
8 1610 3$: 

1610 005037 177776 CLR a4PSs sSET KERNAL MODE 
021614 000001 WAIT sWAIT FOR THE POWER FAIL 

1616 010602 2$: MOV SP ,R2 sGET SP 
021620 016004 014200 MOV SSSTP(RO) ,R4 *R4 CONTAINS THE STACK INIT. VALUE 

1624 162704 000004 SUB #4 RG :STACK=-4 

21 020402 CMP R4,R2 :CHECK STACK 
021632 001401 BE +4 :SKIP_IF OK Le 
e 1634 000000 HAL T :SP NOT “‘STACK-4 

1636 016006 014200 MOV $$STP(RO),SP sRESET SP 
021642 Ol ene MOV (R4)+,R2 :GET RETURN ADDRESS 
021644 105737 016740 TSTB UBEF :1S THE UBE BEING USED? 
021650 001004 BNE 72$ YES 
021652 022702 021616 70$: CMP #2$,R2 : CHECK ADDRESS 


4 
pos ee ees PDP-11/70 SYSTEM POWER FAIL MACY11 30a. 1053) 13-MAR-80 16:04 PAGE 28 
CEKBGC .P11 1 ~B80 16:04 11 SIMPL 


E DOWN/UP TEST (KERNAL) SEQ 0040 
1343 1656 po doaid BEQ +4 ;SKIP IF OK 
1 1660 HALT ;ADDRESS ON STACK IS WRONG 
1345 1662 01140 72$: MOV (R4) ,R2 ;GET OLD PS 
1 1664 2 000000 CMP #0,R2 :CHECK OLD PS 
1 6 1401 BEQ +4 ;SKIP IF OK 
1 1672 HALT ;0LD PS IS WRONG 
13%49 021674 0 040000 014160 BIT #SW14,aSWR(RO) ;LOOP ON TEST? 
1330 1 001262 BNE TST1 ;LOOP TO TST1 
1 
1326 SRR EAR RARE EEE REAR AREER ERAT ARRAN AAR ARRAS 
1354 ;*TEST 2 PROGRAM VOLATILITY TEST 
1355 FERRARA RARER ERA EERE AREER ARERR REAR RE EERE RARER READ 
1328 ata, TST: 
1357 1704 012777 alata 172256 MOV #2,@aDISPLAY ;SET TEST NUMBER 
1358 021712 005037 177776 CLR ;SET KERNAL MODE 
1359 1716 O17 aN 010000 MOV aOee Re : INIT. COUNTER 
iy 1722 01270 MOV #20000 ,R : INIT POINTER 
1361 1 014650 CLR CKSUM(RO) sRESET THE CHECKSUM LOCATION 
1306 021 etry 014650 1$: ADD (R3)+,CKSUM(RO) ;DO CHECKSUM ON 2ND 4K(W) BANK 
1 021 560 014650 ADC CKSUM(RO) 
1364 021742 O S08 R2,1$ 
1365 021744 515903 022000 MOV #2$,R3 :POWER UP RETURN 
1366 1750 105737 016740 TSTB UBEF 7;USE UNIBUS EXERCISER? 
1367 021754 001407 BEQ 64$ os 
1368 1756 37 017022 ASRB UBEL CK 7LOCK OUT OTHER CPUS FROM PROCEEDING 
1369 1762 103375 BCC 74 
1370 021764 241 CLC 
1371 021766 052737 000020 170016 BIS WBIT4,@#UBCR2 ;;SET TO POWER FAIL 
136 021774 64$: 
1 021774 000001 WAIT sWAIT FOR THE POWER TO FAIL 
1374 021776 HALT ;BAD 
1375 2000 012702 010000 2$: MOV #10000 ,R2 
1576 012703 020000 MOV #20000 .R3 
1377 022010 005 CLR R& 
1328 :VERIFY THAT EVERYTHING IS OK 
1 022012 062304 3$: ADD (R3)+,R4 
1380 022014 5504 ADC R4 
1381 022016 077203 S08 R2,3$ 
1s 020460 014650 CMP R4, CKSUM(RO) ;COMPARE NEW CHECKSUM WITH OLD 
1384 022024 001401 BEQ 5$ ;BRANCH IF OK 
1385 HALT 7 ERROR 
Fy 0S 016006 014200 5$: MOV SSSTPC(RO) ,SP sRESET THE STACK 
1387 022034 032770 040000 014160 BIT #SW14,aSWR(RO) LOOP ON TEST? 
1388 022042 001320 BNE TST2 :LOOP TO TST2 
1389 SEERA ARR AAAERARRRERREREEAEEARERERARERERERARERERARARERAAARAERARAR ERED 
1390 s*TEST 3 SIMPLE DOWN/UP TEST (SUPERVISOR) 
1391 FRR RARE RRERERERERERER EERE REEERERAAAAAAERAAAAERAAA ARERR ERE ES 
1392 022044 TST3: 
1393 022044 012777 000003 172116 MOV #3, @DISPLAY 7SET TEST NUMBER 
1394 022052 012737 040000 177776 MOV #40000, a#PS :SET SUPERVISOR MODE 
1395 022060 012703 022120 MOV #2$,R3 :SET POWER UP RETURN 
1396 022064 105737 016740 TSTB UBEF ;;USE UNIBUS EXERCISER? 
1397 022070 001407 BEQ 64$ 2s H IF NO 
1398 022072 106237 017022 ASRB UBEL CK :LOCK OUT OTHER CPUS FROM PROCEEDING 


C 4 
pons gs a PDP-11/70 SYSTEM POWER FAIL MACY11 30A(1052) 13-MAR-80 16:04 PAGE 29 
CEKBGC .P11 1 ~80 16:04 13 SIMPLE DOWN/UP TEST (SUPERVISOR) 
1399 022076 103375 BCC 74 
1400 0221 sted CLC 
1401 1 052737 000020 170016 BIS #BIT4 ,QMUBCR2 ;;SET TO POWER FAIL 
ae 11 643: 
140 110 3$: 
1404 022110 012737 040000 177776 MOV #40000 ,a#PS 7 SET et et a MODE 
1405 2116 000001 WAIT WAIT FOR THE POWER FAIL 
1406 1 016006 014200 2$ V SSSTP(RO) ,SP “RESET 
1407 022126 016004 014200 MOV SSSTPC(RO) RS 
1408 0221 162704 000004 SUB #4 RS 
1409 0221 01240 MOV (R4)+,R2 ;GET RETURN ADDRESS 
1410 1 105737 016740 TSTB UBEF 
1411 142 001004 BNE 72$ 
aai8 144 022702 022120 70$: CMP #2$,R2 ay “_ 
141 O55 125 001401 BEQ . +4 KIP 
1414 022152 000000 ; HALT ‘ADDRESS ON STACK IS WRONG 
1415 022154 011402 723: MOV (R4) ,R2 ;GET OLD PS 
1416 022156 022702 040000 cMP = #40000,,R2 CHECK OLD PS 
1417 022162 001401 BEQ +4 :SKIP IF OK 
1418 022164 000000 HALT :OLD PS IS WRONG 
1419 022166 1$: 
1420 022166 032770 040000 014160 BIT #SW14,QSWR(RO) ;LOOP ON TEST? 
1421 022174 001323 BNE TST3 ;LOOP TO TST3 
1458 
1426 5 RRA REEAEERAAERERA EERE EREREREEE RAE RERERERERRERER EK 
1425 :eTEST 4 SIMPLE DOWN/UP TEST (USER) 
1426 2 RRR AR RARER REAR ERR AEARAAER ARERR RERERARERERERERA EERE EE ERE 
1427 022176 TST4: 
1428 022176 012777 000004 171764 MOV #4, @DISPLAY 7SET TEST NUMBER 
14 022204 012737 140000 177776 MOV #140000 ,a4PS :SET USER MODE 
14 022212 012703 022252 MOV #2$ R53 :SET POWER UP RETURN 
1431 02 $38 105737 016740 TSTB UBEF ; USE BE EXERCISER? 
ott 022222 001407 BEQ 64$ H IF NO 
143 Osesen 106237 017022 ASRB UBELCK :LOCK OUT OTHER CPUS FROM PROCEEDING 
1434 0222 103375 BCC 74 
1435 022232 000241 CLC 
1436 are 052737 000020 170016 BIS WBITS QMUBCR2 ;;SET TO POWER FAIL 
1437 242 64$: 
1438 022242 3$: 
1439 022242 012737 140000 177776 MOV #140000 ,a#PS ;SET USER MODE 
1440 Ogsee9 000001 WAIT WAIT FOR THE POWER FAIL 
1441 022252 016006 014200 2$: MOV SSSTPC(RO) SP RESET SP 
Le 0S 56 016004 014200 MOV SSSTPCRO) ,RS =GET STACK INIT. VALUE 
144 162704 000004 SUB #4 RG sMINUS 4 
1444 02 0124 MOV (R4)+,R2 :GET STACK-4,AUTOINC. STACK 
1445 022270 105737 016740 TSTB UBEF 
1446 022274 001004 BNE 72$ 
1447 022276 022702 022252 70$: CMP #2%,R2 ; CHECK ADDRESS 
1448 022 001401 BEQ - +4 :SKIP IF OK 
1449 022304 000000 HALT :ADDRESS ON STACK IS WRONG 
1450 022306 011402 72%: MOV (R4) ,R2 ;GET OLD PS 
1451 022310 022702 140000 cMP = #140000..R2 :CHECK OLD PS 
1452 022314 001401 BEQ +4 :SKIP IF OK 
1453 022316 000000 HALT :OLD PS 1S WRONG 


1454 022320 032770 040000 014160 BIT  #SwW14,aSWR(RO) LOOP ON TEST? 


ee 


MAINDEC-11-CE =-€ a SvSTEM oat FAIL 
CEKBGC .P11 13-MAR-80 16:04 SIMPL 
Le F 022326 001325 BNE 

1457 
1685 

SSTEST 5 
bret 
1 022330 rST5: 
146 Oss ae 01 Onenas 5S 171632 MOV 
1464 177776 CLR 
1465 s 2 012760 022400 014702 MOV 
1466 022350 012703 022426 MOV 
1467 2354 105737 016740 TSTB 
1468 Oss 001407 BEC 
1469 106237 017022 ASRB 
1470 022 103375 BCC 
1471 022370 241 CLC 
14 022372 052737 000020 170016 BIS 
14 022400 64$: 
1474 se 016006 014200 3$: MOV 
1475 2404 005737 000003 TST 
1476 022410 105737 016740 TSTB 
1477 022414 001403 BEQ 
1478 022416 042737 000020 170016 BIC 
1479 022624 65$: 
1480 022424 HALT 
1481 022426 012760 940630 014702 1$: MOV 
1482 022434 032770 040000 014160. BIT 
1483 022442 001332 BNE 
1484 
1485 
486 
1487 
1488 
1489 SATEST 6 
1490 
1491 022444 TST6: 
1492 022444 012777 171516 MOV 
1493 022452 005037 177776 CLR 
1494 022456 012760 022526 014702 MOV 
1495 022 012703 922560 MOV 
1496 022470 012706 000002 MOV 
1497 022474 105737 016740 TSTB 
1498 022 1407 Q 
1499 022502 106237 017022 ASRB 
1500 022 103375 ~ BCC 
1501 022510 000241 CLC 
1308 022512 052737 000020 170016 BIS 
150 Ogs2 64$: 
1504 022520 005037 177776 CLR 
1505 022524 000001 WAIT 
1806 022526 012737 022534 014662 2$: MOV 
1507 022534 7$: 
1508 022534 105737 016740 TSTB 
1509 022540 001403 BEQ 
1510 022542 042737 000020 170016 BIC 


MACY11 


E DOWN/UP TE 
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;LOOP TO TST4 


TOPCO RESRASEAEEASESELELELE LPS EEE RE RRR RR RRR RRR RRR RRR RRR RRR R RAR AA SESS 


POWER FAIL WITH ODD ADDRESS 


PORE RERESAESSSALSLELELEL ELAS RARER RRR RRA RR SAR RRR RAR RRR RAR ARRAS RSD S SE , 


#5. aDISPLAY :SET TEST NUMBER 
-SET KERNAL E 

#3$,ERRTAB(RO) ;SET TRAP VECTOR 

#1$,R3 =SET RETURN ADDRESS FOR POWER FAIL 
; SUSE UNIBUS EXERCISER? 

64$ sBRANCH IF NO 

UBEL CK “LOCK OUT OTHER CPUS FROM PROCEEDING 

#B1T4,QMUBCR2 ;;SET TO POWER FAIL 

$$STP(RO),SP *RESET STACK 

a3 :CAUSE ODD ADDRESS TRAP 

UBEF *:USE UNIBUS EXERCISER? 


65$ 
#B1T4 ,a#UBCR2 


#CPUER, ERRTAB(RO! 
#SW14,9 aSwWR (RO) 


3:CLEAR POWER FAIL ENABLE 
ODD ADDRESS TRAP FAILED 
SET 4 


;LOOP ON TEST? 
:LOOP TO TSTS 


RAE AARAKEEEERRAEREEEEEAEEAEAREEEREREAEEEAEARAAEREERERARKEREERERE 


POWER FAIL IN THE RED ZONE 


RARER EARAAEREREARERAAAEEEAAEEAEKERARAEKAEREREEEEEKEEEAEREAREAREREEEE 


#6, aDISPLAY : SET TEST NUMBER 

:SET KERNAL MODE 
#23. ERRTAB(RO) :SET TRAP REGISTER 
#1$,R3 -SET POWER UP RETURN 
#2,SP :SET STACK TO RED ZONE 
UBEF sUSE UNIBUS EXERCISER? 
64$ H IF NO 
hae “LOCK OUT OTHER CPUS FROM PROCEEDING 
WBIT4,QMUBCR2 ;;SET TO POWER FAIL 
aAPS - SET KERNAL MODE 

WAIT FOR POWER FAIL TRAP 

#7$,PWRTAB “SET UVEC TO HALT 
UBEF ; ;USE UNIBUS EXERCISER? 


65$ 
#B1T4 ,a#UBCR2 


7: CLEAR POWER FAIL ENABLE 
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65$: 
HALT s ILLEGAL TRAP TO 4 
MOV #POWDWN,PWRTAB ;RESET DVEC 

1$: MOV $$STP(RO).SP  :RESET STACK 
MOV #CPUER , ERRTAB(RO) :RESET & 
MOV a2 .R2 :GET FOR TYPING 
CMP aF2 , #0 71S 2 OK? 
BEQ +4 sSKIP IF OK 
HAL T ;NO! 
MOV ayr0.R2 :GET FOR TYPING 
CMP #PWRDIS,a#0 OK? 
BEQ +4 =SKIP IF OK 
HALT -0 IS WRONG! 
BIT #SW14.aSWR(RO) :LOOP ON TEST? 
BNE TST6 “LOOP TO TST6 


5 FRR RRR EERE ERERERE ARERR EREAERER ERE RRR 


“*TEST 7 POWER FAIL WITH TIME OUT (KERNAL) 
TOO RRRAARAELAEALBEAALABCAABRAAAAAAEALESABSALALALALALEA SERA AR ARARAR AAR AAS & 
TST?: 
MOV #7 ,QDISPLAY :SET TEST NUMBER 
CLR KERNAL MODE 
MOV #3$, ERRTAB(RO) cr TRAP VECTOR 
V #1$,R3 “SET UP RETURN ADDRESS FOR POWER FAIL 
TSTB  ~—sCUBE > USE UNIBUS EXERCISER? 
BEQ 64$ 23 H IF NO 
ASRB UBEL Ck “LOCK OUT OTHER CPUS FROM PROCEEDING 
CLé : | 
me BIS #BIT4,aMUBCR2 ;:;SET TO POWER FAIL 
3$: MOV S$$STP(RO) ,SP SET STACK 
CLR aAPS SET KERNAL MODE 
MOV RO, a#173000 ; CAUSE A TIMEOUT 
isTe UBEF *:USE UNIBUS EXERCISER? 
sa BIC #BI1T4,a#UBCR2 ::CLEAR POWER FAIL ENABLE 
53a -TIMEOUT FAILED 
1$: MOV $$STP(RO), SP *SET STACK 
MOV #CPUER, ERRTAB(RO) sRESET 4 
BIT #SW14,aSWR(RO) :LOOP ON TEST? 
BNE TST7 “LOOP TO TST7 


RARER EEEREREEREEKCEEKEREKAAKEEEEEEEEEEEKEEKEEEERERR EE 


“*TEST 10 


5 ERR AERA ERE REE RE REREEEEERE EERE ARERERERERRARRERER ARR RARE EES 


POWER FAIL IN THE YELLOW ZONE (KERNAL) 


MOV #10, aDISPLAY ;SET TEST NUMBER 


CLR aps SET KERNAL MODE 

CLR FLAG “CLEAR THE FLAG 

MOV #2$.ERRTAB(RO) :SET SICK TPAP ADDRESS 

MOV #400, SP “SET STACK TO YELLOW ZONE 

MOV #1$,R3 “SET RETURN ADDRESS FOR POWER FAIL 
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POWER FAIL IN THE YELLOW ZONE (KERNAL 


STB —sC UBF USE UNIBUS EXERCISER? 
BEQ 64$ : :BRANCH IF 
ASRB UBEL Ck -LOCK OUT OTHER CPUS FROM PROCEEDING 
CLC : 
oe BIS WRITG,@#UBCR2 ::SET ) POWER FAIL 
a aePs :SET KERNAL MODE 
i WAIT “WAIT FOR POWER FAIL 
TSTB —sCUBEF :;USE UNIBUS EXERCISER? 
BEQ 65$ 
ve BIC #BITG4.@#UBCR2 ::CLEAR POWER FAIL ENABLE 
HALT :POWER FAIL RETURNED TOO SOON 
BR 4$ :SKIP SP CHECK 
2$: MOV #CPUER., ERRTAB(RO) RESET 4 
st FL LAG 1S THE FIRST INSTRUCTION FLAG SET? 
m MOV #7$,,PWRTAB ‘SET UVEC TO HALT 
TSTB ~—sC UBF +:USE UNIBUS EXERCISER? 
BEQ 66$ 
i BIC #BIT4,@#UBCR2 ;::CLEAR POWER FAIL ENABLE 
"HALT :NOT ENOUGH OR TOO MANY INSTR. EXEC. 
MOV #POWDWN,PWRTAB SET DVEC 
BR T OUT 
5$: MOV #4$,R3 “SET RETURN 
RT! “GO TO THE POWER FAIL ROUTINE 
~ HALT “SHOULD NOT RETURN HERE 
BIT #Sw14,aSwWR(RO) ;:LOOP ON TEST? 
BNE TST10 *LOOP TO TST10 
«  seehvawenenhecsedhanenerensecenenarantenuersqeneenetscaveqenees 
=*TEST 11 POWER FAIL WITH RESETS 
5 RRA AEREEREREREEEEREERERERRERERRARRERERARARARERREEAAR ARERR RAS 
TST11: 
MOV #11,Q@DISPLAY  ;:SET TEST NUMBER 
CLR ayes >SET KERNAL MODE 
MOV #1$,R3 “SET RETURN ADDRESS 
MOV $SSTP(RO).SP _=RESET STACK 
TSTB. ~—Ss«UIBEF ; sUSE UNIBUS EXERCISER? 
BEQ 64$ > :BRANCH IF NO 
ASRB UBEL CK “LOCK OUT OTHER CPUS FROM PROCEEDING 
CLC i 
aie BIS WRIT4,@M#UBCR2 ;;:SET TO POWER FAIL 
3$: RESET :RESETS 
RESET “TO WAIT 
RESET 3 IN 
8R 3$ ; LOOP 
1$ MOV $$STP(RO).SP | :RESET STACK 
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KBGC .P11 POWER FAIL WITH RESETS 

1623 023242 032770 040000 014160 BIT #SW14,QSWR(RO) ;LOOP ON TEST? 

1624 025250 0013435 BNE TST11 :LOOP TO TST11 

1625 

1626 

1627 FERRARA RAAT AAA REA AAA AAA AAA A AAA TERA RER REAR ERA eee 
1628 :*TEST 12 POWER FAIL WITH ODD ADDRESS (SUPERVISOR) 

oes 5 REAR AERA EERE EAE AAA ARATE TRAE RARER 
16 023252 TST12: 

1631 023252 012777 000012 170710 MOV #12, aDISPLAY ;SET TEST NUMBER 

1632 023260 012737 040000 177776 MOV tes 2aFPS :SET SUPERVISOR MODE 

1633 023266 012760 023324 014702 MOV #3$,ERRTAB(RO) ;SET TRAP VECTOR 

lon 023274 012703 023364 MOV #1$,R3 ;SET RETURN ADDRESS FOR POWER FAIL 
1635 023300 105737 016740 TSTB UBEF ; SUSE “Bis EXERCISER? 

1636 OS eaoe 001407 BEQ 64$ ;BRANCH IF NO 

1637 023306 106237 017022 ASRB UBELCK :LOCK OUT OTHER CPUS FROM PROCEEDING 
16 023312 103575 BCC 74 

1639 023314 1 CLC 

1640 023316 052737 000020 170016 BIS ABIT4 ,a@#UBCR2 ;;SET TO POWER FAIL 

1641 023324 64$: 

1642 023324 016006 014200 3$: MOV $$STP(RO) ,SP sRESET STACK 

1643 0233 012737 040000 177776 MOV #40000 ,avPS ;SET SUPERVISOR MODE 

1644 023336 005737 000003 TST a5 ;CAUSE ODD ADDRESS TRAP 

1645 023342 005037 177776 CLR a4PS :SET KERNAL MODE 

1646 023346 105737 016740 TSTB UBEF 7;USE UNIBUS EXERCISER? 

1647 023352 001403 BEQ 65$ 

Ley | 023354 042737 000020 170016 658 BIC WBIT4,aM#UBCR2 ;;CLEAR POWER FAIL ENABLE 

1650 023362 000000 HALT ;0DD ADDRESS TRAP FAILED 

1651 023364 016006 014200 1$: MOV $S$STP(RO) SP :RESET STACK POINTER 

1652 023370 012760 040630 014702 MOV § #CPUER, ERRTAB(RO) :RESET 4 

1653 023376 032770 040000 014160 BIT #SW14,aSWR(RO) ;LOOP ON TEST? 

1654 023404 001322 BNE TST12 ;LOOP TO TST12 

1 

1657 FERRARA AREER TREE RE EERE RARER AERA REREEERERERE RARER ERE R ES 
1658 T*TEST 13 POWER FAIL WITH TIME OUT (SUPERVISOR) 

1659 «EERE RREE REE REAR EERRARA AAA ARR ERRER AAR EREER AREER REE 
1660 023406 TST13: 

1661 023406 012777 000013 170554 MOV #13 .aDISPLAY ;SET TEST NUMBER 

1662 023414 012737 040000 177776 Mov #40000,a"PS ;SET SUPERVISOR MODE 

1663 023422 012760 023460 014702 MOV a3. ERRTAB(RO) :SET TRAP VECTOR 

1664 023430 012703 023520 MOV #1$,R3 7SET UP RETURN ADDRESS FOR POWER FAIL 
1665 023434 105737 016740 TSTB UBEF ; SUSE UNIBUS EXERCISER? 

1666 3440 001407 BEQ 64$ CH IF NO 

1667 3442 106237 017022 ASRB UBEL CK :LOCK OUT OTHER CPUS FROM PROCEEDING 
1668 023446 1033575 BCC 74 

1669 023450 000241 CLC 

1670 023452 052737 000020 170016 BIS #B1T4,QMUBCR2 ;;SET TO POWER FAIL 

1671 023460 64$: 

1672 023460 016006 014200 3$: MOV S$STP(RO) SP sRESET STACK 

1673 023464 012737 040000 177776 MOV #40000 ,a¥#PS 7 SET wteg ort MODE 

1674 023472 010037 173000 MoV RO,a#173000 = ; CAUSE_A_ TIMEOUT 

1675 023476 005037 177776 CLR aFPS :SET KERNAL MODE 

1676 023502 105737 016740 TSTB UBEF ;;USE UNIBUS EXERCISER? 

1677 023506 001403 BEQ 65$ 

1678 023510 042737 000020 170016 BIC #BIT4,aMUBCR2 ;;CLEAR POWER FAIL ENABLE 
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65$: 


023516 
1680 023516 HALT ;TIMEQUT FAILED | 
1681 5 016006 014200 1$: MOV SS$STP(RO) SP RESET STACK 
1682 023524 012760 040630 014702 MOV #CPUER,ERRTAB(RO) ;RESET 4 | 
1 0235 0 0 040000 014160 BIT #SW14,aSWR(RC) ;LOOP ON TEST? | 
ef: 023540 001322 BNE TST13 ;LOOP TO TST13 | 
1686 | 
1687 pL EAE E EATER ETRE ee | 
1688 r*TEST 14 POWER FAIL WITH ODD ADDRESS (USER) 
1689 RRR EERE ARERR EERE EERE AAA TATA AAR ATTA AA | 
1690 023542 TST14: 
1691 023542 012777 000014 170420 MOV #14, aDISPLAY ;SET TEST NUMBER | 
1692 0 $2 012737 14 177776 MOV #14 ,@4PS :SET USER MODE 
1693 023556 012760 023614 014702 MOV #3$,ERRTAB(RO) ;SET TRAP VECTOR 
1694 0 S297 012703 023654 MOV #1$,R3 ;SET RETURN ADDRESS FOR POWER FAIL 1 
1695 023570 105737 016740 TSTB —CUBEF :;USE UNIBUS EXERCISER? | 
Jon 023574 001407 BEQ 64$ 3;BRANCH IF NO 
1697 023576 106237 017022 ASRB UBEL CK ;LOCK OUT OTHER CPUS FROM PROCEEDING 
1698 023602 103375 BCC 74 
1699 023604 000241 CLC 
1700 023606 052737 000020 170016 BIS #B1T4,Q@MUBCR2 ;;SET TO POWER FAIL 
1701 023614 64$: 
1706 023614 016006 014200 3$: MOV SSSTPC(RO),SP sRESET STACK 
1703 023620 012737 140000 177776 MOV #140000 ,a4PS :SET USER MODE 
1704 02 005737 0000035 TST as ;CAUSE ODD ADDRESS TRAP 
1705 0236 005037 177776 CLR @FPS :SET KERNAL MODE 
1706 023636 105737 016740 TSTB UBEF 7;USE UNIBUS EXERCISER? 
1707 023642 001403 BEQ 65$ 
a". ree 042737 000020 170016 oss BIC #BIT4,Q#UBCR2 ;;CLEAR POWER FAIL ENABLE 
1710 023652 000000 HAL T ;0DD ADDRESS TRAP FAILED 
1711 023654 01 014200 1$: MOV SSSTP(RO) SP sRESET SP 
1712 023660 012760 040630 014702 MOV #CPUER ,ERRTAB(RO) ;RESET 4 
1713 023666 032770 014160 BIT #SW14,aSWR(RO) ;LOOP ON TEST? 
1714 023674 001322 BNE TST14 ;LOOP TO TST14 
in 
1717 FERRER AREER EERE ERE ER ER RERERERERRARRARAR AAA AAR AEA E REE ED 
1718 s*TEST 15 POWER FAIL WITH TIME OUT (USER) 
1719 FARRAR RREEREERRERER EER EREEA ERE REREREERERREAARARERA RARER EA RE EER 
1720 023676 TST15: 
1721 023676 012777 000015 170264 MOV #15 ,aDISPLAY :SET TEST NUMBER 
1766 023704 012737 140000 177776 MOV #14 ,@APS 7SET USER MODE 
1723 023712 012760 023750 014702 MOV #3$,ERRTAB(RO) ;:SET TRAP VECTOR 
1724 023720 012703 024010 MOV #1$,R3 >SET UP RETURN ADDRESS FOR POWER FAIL 
1725 bear 105737 016740 TSTB UBEF :;USE UNIBUS EXERCISER? 
1726 023 001407 BEQ 64$ ; BRANCH IF NO 
1727 023732 iis $i 017022 ASRB UBELCK ;LOCK OUT OTHER CPUS FROM PROCEEDING 
1728 023736 103575 BCC 74 
1729 023740 000241 CLC 
1730 023742 052737 000020 170016 BIS ABIT4,Q@#UBCR2 ;;SET TO POWER FAIL 
1731 023750 64$: 
1732 023750 016006 014200 3$: MOV $$STP(RO) ,SP sRESET STACK 
1733 023754 012737 140000 177776 | MOV #140000 ,a#PS 3SET USER MODE 
1734 023762 010037 173000 Mov _— RO, a#178000 :CAUSE A TIMEOUT 
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023766 005037 177776 CLR aAPS :SET KERNAL MODE 
023772 105737 016740 TSTB —sCUBEF >:USE UNIBUS EXERCISER? 
023776 001403 BEQ 65$ 
924000 042737 000020 170016 ie BIC #BI1T4,@M#UBCR2  ::CLEAR POWER FAIL ENABLE | 
024006 000000 HALT TIMEOUT FAILED 
024010 016006 014200 1$: MOV $$STP(RO).SP “RESET STACK 
024014 012760 040630 014702 MOV #CPUER, ERRTAB(RO) RESET 4 
924022 032770 040000 014160 BIT #SW14,aSWR(RO) ;LOOP ON TEST? 
024030 001322 BNE TST15 “LOOP TO TST15 
SL RRAAARAAAARAAEAAAAAREEAEAAAEAAAERARERRERAERENERERHAARER RARE NERS 
-*TEST 16 MEMORY MANAGEMENT ABORT TEST 
5 SRARAAAAAAAAARAKAAAEAARARAEAAARAAARAAERERARERERERRARARARHARAARA AAS 
024032 TST16: 
024032 012777 000016 170130 MOV #16,Q@DISPLAY  ;SET TEST NUMBER 
024040 005037 177776 CLR QPS *SET KERNAL MODE 
024044 012760 004000 014612 MOV #T1.  PFFTC(RO)- :TIME THIS POWER FAIL 
024052 012760 024152 014702 MOV #4$.ERRTAB(RO) ;:SET FOR TIMEOUT 
024060 004737 033406 JSR PC ,MAP *MAP THE WORLD 
024064 012737 024126 000250 MOV WSS. aAMPVEC 7SET MEMORY MANAGEMENT VECTOR 
024072 012703 024154 MOV #1$,R3 “LOAD PF RETURN 
024076 005237 177572 INC Q4MMRO * TURN MEMORY MANAGEMENT ON 
024102 105737 016740 TSTB —«UBEF ; SUSE UNIBUS EXERCISER? 
024106 001407 BEQ 64$ H IF NO 
024110 106237 017022 ASRB —sUBELCK *LOCK OUT OTHER CPUS FROM PROCEEDING 
024114 103375 BCC 4 
024116 000241 CLC 
024120 052737 000020 170016 ae BIS W#B1T4.@#UBCR2 ;;:SET TO POWER FAIL 
024126 016006 014200 3$: MOV $$STP(RO).SP ZAP STACK 
024132 005237 140000 INC #140000 “ACCESS VIOLATION 
24136 105737 016740 TSTB ~—sUBEF -:USE UNIBUS EXERCISER? 
024142 001403 BEQ 65$ 
024144 042737 000020 170016 ae BIC #BIT4,aMUBCR2 ::CLEAR POWER FAIL ENABLE 
024152 000000 4$: HALT :NO VIOLATION OR TRAP TO.4 
024154 005037 177572 1$: CLR QAMMRO : TURN OFF MEMORY MANAGEMENT 
024160 016006 014200 23: MOV $SSTP(RO),.SP | :MAKE A NEW STACK 
024164 012760 040630 014702 MOV #CPUER,ERRTAB(RO) sRESET 4 
024172 032770 014160 BIT #SW14,aSWR(RO) ;:LOOP ON TEST? 
024200 001314 BNE TST16 *LOOP TO TST16 
024202 005077 167762 CLR @DISPLA : CLEAR THE sDISPLAY REGISTER. 
105737 016737 TSTB = MPF MP MODE? 
024212 001002 BNE 5$ “ BRANCH iF YES 
02421% 000137 035326 m JMP SEOP “UUMP INTO EOP 
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11 13-MAR=80 16:04 116 MEMORY MANAGEMENT ABORT TEST SEQ 0048 
SRRARAAAAAAAAA AAA A TERRE RRRARARARAAAERARARARERARAHEAR AAR AARHAR EARS 
SRERAAARARAAERARRARREEREREEEARAAAAEEAERARERRERAEREREA RARER RAREAR ERAS 
{RRA RAEN KEEE RARKKEKRAKEEAARAK 
seekeeneeeneeeeeee SE CT] ON TWO KKK R ERE EE 
SERRE ERE KAEAKEEAAREAEEAERAE 
SRR EAA REAR AEE EERE AEREEEE REAR ARERERAARRRERER ARERR ERRER EER ES 
Ss RERARAARREAEEREERRERERER EE EAE EERE AEREAEAAEAERREREREEREEREERE ERE R EES 

7 .SBITL SECTION 2 INITIALIZATION 

24220 012703 024244 SEC2: MOV #1$, R3 :SET UP POWER FAIL RETURN IN CASE 

024224 106237 016776 ASRB —s SYNC.3 “CONTROL THE ENTRY 

024230 103373 BCC SEC2 

024232 005237 016716 INC $2L0G61 :LOG INTO SEC2 

024236 012737 000001 016776 MOV #1, SYNC. 3 “LET THE OTHERS IN 

4244 023737 016716 016774 1S: CMP S2L0G61, CPUACT >:WAIT FOR EVERYONE TO GET ... 

024252 001374 BNE 1$ : ZHERE 

024254 005700 TST RO -:1S THIS THE MASTER? 

024256 001002 BNE 3$ is H IF NO 

024260 104401 041635 % TYPE 115 :"ENTERING SECTION 2°° 

24 052777 100000 172536 BIS WBIT15, @ACR s INITIALIZE IIST 

024272 016006 014200 MOV $$STP(RO), SP =SET THE STACK 

024276 106237 017026 2$: ASRB = S21 >: TRY TO ENTER SECTION 2 INITIALIZATION 

024302 103375 BCC 2$ 

024304 012737 034464 000024 MOV ASPOWER ,a424 ::SET NEW POWER FAIL HANDLER 

024312 012737 000340 000026 MOV #340, a426 

024320 017705 172504 MOV @ACR, R5 :COPY ACR 

024324 072527 177770 ASH #-10, RS “GET THE ID 

024 010560 014240 MOV RS, $REGO(RO): IDENTIFY CPU FOR ERROR TYPE-OUT 

024334 005002 CLR *RESET FOR COUNT 

024336 026205 014226 65$: CMP $CPUID(R2).R5 :SID MATCH? 

024342 001404 BEQ 64$ 

024344 005722 TST (R2)+ : INCREMENT R2 BY 2 

024346 020227 000010 CMP R2,410 

024352 002771 BLT 65$ 

024354 010200 64$: MOV R2,RO -MOV LOGICAL ID TO 2ND OPERAND 

024356 010001 MOV RO, R1 -SET UP R1 


006201 R1 
024362 012760 034656 014662 MOV #SPWRDN, PWRTAB(RO) :SET UP FOR POWER DOWN 


at's So 
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024370 
024376 
024404 
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012760 
036037, 


o16239 


000240 
012716 
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SECTION 2 INITIALIZATION 


024664 


000040 
040630 


176710 
040000 


001000 
016742 
000400 
014632 


014632 


000010 
016742 


041750 
014226 
001400 


176710 
001000 


000010 
014632 
001000 
043752 
044000 
014226 
044014 
000001 
016720 
016774 
040602 
024674 


024516 


014702 


176710 
014702 


176712 


176712 


176712 


014632 


176712 


014632 


017026 
016720 
172154 


SIZMBS: 


RPSRC: 


1$: 


NXTDRV: 


NORH70: 


15$: 


SIZEND: 


MOV 


MACY11 _3oacos@» 


#NORP ,ERRTAB(RO) 


#B1T5 ,@#RPCS2 
pm ,ERRTAB(RO) 


2 
R2,aA4R CS2 
#81114, a#RPDS 
NXTDRV 
4#B1T9,a#RPDS 
RPPGM(RO) 
NXTDRV 
#8178 ,a#RPDS 
NXTDRV 
MBDSW (RO) 
@ARPCS2 RS 
#177770,R3 
R3,MBDSW(RO) 
SIZEND 


R2 


Re 
R2,410 
RPSRC 
RPPGM(RO) 
A 
01 
SCPUID(RO), ~(SP)_ 


#1400 ,MBDSW(RO) 
ane 


2 
R2, a#RPCS2 
#81T9, a#RPDS 
15$ 
10$ 


R2 .MBDSW(RO) 
eo 


SPGM 
R2, -(SP) 
$PGM2 
$CPUID(RO), ~(SP) 


. $PGM5 

#1,S2L1 

S2L0G2 

pre! -S2L. 062 
MISTDIS,@ISTVEC 
TST17 


#NORH70, (SP) 


13-MAR-80 


16:04 PAGE 37 


:;SET UP CPU ERROR VECTOR IN CASE 
7; THERE'S NO RPO/5/6 

:; INIT. RP CONTROLLER, IF THERE. 
es RROR VECTOR 


SET DRIVE # IN CS REG. 
e315 THE DRIVE UP? 
; BRANCH IF IT ISN'T 


3218S THE PGM BIT SET FOR THIS DRIVE 


72 YES, FLAG THE CONDITION 
sAND, SEARCH FOR ANOTHER DRIVE 
i318 THIS PORT IN Ses ROL ? 


;NO, LOOK FOR ANOTHER 
7: CLEAR — DEVICE SELECTION 


:COPY C 
::GET RID OF OTHER INFO 
;;WRITE DRIVE ID INTO SELECTION W 
:sDEV VICE HAS BEEN FOUND. 
ae DRIVE 
+ALL DRIVES TESTED? 
:;NO, TEST SOME MORE. 
7 ANY PROGRAMMABLE DRIVES? 


::"NO MASSBUS DEVICE AVAILABLE ON CPU #”’ 
::SAVE SCPUID(RO) FOR TYPEOUT 


ssaet t NO DEVICE 
2cEXIT y te INITIALIZATION 


VE 
7 ZALL DRIVE TESTED 


YES. 
ESET DRIVE # 
ee PGB 


IT 
; TYPE SHARED DRIVE WARNING MSG 


: ¢ALLOW ENTRY INTO SEC. 2 
LOG OUT OF SECTION 2 INITIALIZATION 
:WAIT FOR ALL THE CPUS TO GET HERE 


:;POINT TO DISPATCHER 
:START THE TEST 


a IS NO RP CONTROLLER 
7SET FOR TEST ENTRY RETURN 





SEQ 0049 


: 


gs 


é 
: x 


me ed ed = = 0) = 0) od 0 od tt = = 3) 3 od 4 
SLLVLYLLLLLLLHSLSE 
SODNAAEWN OOH VED 


SeBee8 
wn 


1940 
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P11 —~MAR-80 SECTION 2 INITIALIZATION 
024672 000002 RTI : ;RETURN 
S ERAAAAAAAAAAAEAEAEAEERAAEAEEEERAKRERERERARARARRARRERRERARRERRRARRR AHS 
“TEST 17 CHECK "BRK' & "DCF" FLAGS DURING POWERFAIL 
ST RAAAAARARRARERENREAEAEAEREERAEARRENEREREEERAEREREAAARERARRARAERAH HEH 
024674 1ST17: 
024674 000017 167266 MOV #17, QDISPLAY §:SET TEST NUMBER 
tL RAR A ERE TST ZASFORK 8&RRRRAEREREKREEREREEEERE 
024702 014200 MOV $$STP(RO), SP:SET UP THE STACK 
024706 100000 172114 BIS WBIT15, @ACR INITIALIZE THE IIST 
024714 000126 70$:  ASRB a69$ “ENTER CONTROL FORK 
024720 BCC 70$ 
024722 000114 016774 CMP @67$, CPUACT sHAVE WE REACHED THE END OF THE 
:ROUTING CYCLE? 
024730 65$ “BRANCH IF NO 
024732 016774 MOV CPUACT ,R2 
024736 DEC R2 
024740 ASL R2 : (CPUACT-1) #2 
024742 000076 a68$ .R2 “ARE WE AT THE END OF THE TEST? 
47 BNE 64$ “BRANCH IF NO 
024750 000001 000070 MOV #1, a69$ :EXIT 
0247 025524 JMP TST20 
0247 000002 000054 64$: ADD #2 a68$ : INCREMENT 68% BY 2 
024770 000046 CLR a67$ =CLEAR THE CHECKPOINT COUNTER 
024774 000042 65$: INC a67$ * INCREMENT CHECKPOINT 
929000 014642 CLR SIGNAL “CLEAR SIGNAL LOC 
025004 014714 CLR SYNC .2 *CLEAR THE LOCK 
025010 30 RO, a68$ :ROUT E THIS PROCESSOR THROUGH TS17A? 
025014 001005 BNE 66$ H IF NO 
025016 012 000001 000022 MOV #1,a69S =CLEAR LOCK 
4 000137 025050 JMP TS17A * JUMP TO BRANCH TS17A 
5030 012777 000001 000010 66$: MOV #126 -CLEAR LOCK 
5036 000137 025172 JMP TS17B JUMP TO TS17B 
KREEAAREKEKEKEEEARERAKEAKEAKCEAAKEAEERAEKCEREKEAAAEKEAREAEREEKEEEE 
025042 016722 67$: C7 
025044 016724 683: C2 
025046 017004 69$: (3 
025050 112761 000017 014002 1TS17A: MOVB #17,  $TSTNM(R1) :SET UP THE TEST NUMBER 
025056 010037 017062 MOV RO,PUT -SET PROCESSOR UNDER TEST 
025062 005700 TST RO :I1S THIS THE MASTER? 
025064 001007 BNE 54% ; BRANCH IF NO 
025066 104401 041713 TYPE 177 - TEST 
025072 005046 CLR -(SP) 
025074 116116 014002 MOVB  $TSTNM(R1),(SP) :GET THE TEST NO. 
025100 104403 TYPOS 
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000002 


PDP-11/70 SYSTEM a A 


16:04 HE CK 
. WORD 
S$: 
041724 TYPE 
014226 V 
TYPDS 
014333 TYPE 
014020 014612 MOV 
025160 014672 roe 
014642 CLR 
000001 014714 MOV 
WAIT 
024674 JMP 
BAD: ERROR 
HALT 
024674 MOV 
RTI 
014002 1S17B: MOVB 
014714 ASRB 
BCC 
016764 INC 
016764 016770 Na 
000001 014714 a 4g 
016764 2s: CLR 
014220 5$: TYPE 
025160 014672 V 
171552 MOV 
171546 BIS 
7 171536 MOV 
71534 MOV 
025376 014672 MOV 
014642 1$: 
BCC 
000001 014642 MOV 
171504 014250 MOV 
000000 171474 MOV 
171472 0142 MOV 
171464 014270 MOV 
ERROR 
016766 INC 
016766 016770 CMP 
BNE 
016766 CLR 
024674 10$: JMP 
STS17: 
171424 MOV 
017062 MOV 
014226 MOV 
000401 MOV 
ASH 


MACY11 350A(1 1053) 13-MAR-80 10: 04 PAGE 39 
"BRK' & "DCF" FLAGS DURING POWERFAIL 
2 TYPE 2 DIGITS, NO LEADING 0 


;"POWER FAIL CPU &"" 
:SAVE $CPUID(RO) FOR TYPEOUT 
::G0 TYPES DECIMAL ASCII WITH SIGN 


, SCRLF 
#SSU!TIINCK PFFT(RO) ;SEND SIG. ON UP, TIME, DON’T SAVE ™™ 


M100 
$CPUID(RO), -(SP)’ 


#BAD.ISTTAB(RO) ;SET UP ist VECTOR FOR THIS CPU. 

R3 “RETURN AFTER THE WAIT ON POWER 

SIGNAL :CLEAR THE POWER UP SIGNAL 

#1, SYNC.2 “UNLOCK THE OTHER CPUS 
:WAIT FOR THE POWER TO FAIL. 

TST17 :GO TO CONTROL FORK 

25 :UNEXPECTED CPU INTERRUPT 

#TST17, (SP) : CONTINUE TESTING 

#17, STSTNM(RI) :SET UP THE TEST NUMBER 

SYNC.2 WAIT FOR P.U. T. TO SEND SIGNAL 

1S17B = LOOP UNTIL SENT 

LOG1 =COUNT CPU'S COMING THRU 

LOG1,CPULS1 s ALLHERE? 

2$ =YES = SKIP 

#1.SYNC.2 “NO, LET NEXT ONE IN 

5$ > THEN CONTINUE 

LOG1 sLAST ONE INITIALIZES COUNTER 

»SNULL FLUSH THE TYPE QUEUE 

#BAD, ISTTAB(RO) :GET SET FOR BAD INTERRUPT 

#PGCS,@ACR *ACCESS PGCS REGISTER 

WBIT2,@ADR “SET THE INTERRUPT ENABLE BIT 

#DCF ,@ACR :COPY THE DCF REG. 

@ADR.R 


;SET FOR EXPECTED INTERRUPT © 
T ON POWER FAIL SIGNAL 


#1, SIGNAL “LET ANOTHER IN 
@ACR,$REGI(RO) SAVE THE ACR 

#PGTE ,@ACR “ACCESS THE PGTE REG. 
@ADR, $REG2(RO) :SAVE THE PGTE REG. 
“SAVE THE REG 


R5 :INTOR 
#STSi7, ESTTABCRO) | 
SIGNAL 


062 

LOG2.CPULS1 ; 

0$ “NO - SKIP 

062 “YES, INIT FOR NEXT CYCLE 
TST17 “DO IT AGAIN 

#DCF ,@ACR sACCESS DCF REGISTER 

PUT, “GET LOGICAL ID INTO R3 
SCPUID(R3).R4  :COPY [IST ID TO DESTINATION. 
#401.R3 “MAKE A MASK 

R4,R3 “BRING IT INTO POSITION 


SEQ 0051 
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000001 +f CK 

025674 JMP TS20A * JUMP TO BRANCH TS20A 
000001 000010 66$: MOV #1, a69$ “CLEAR LOCK 

026006 JMP TS20B * JUMP TO TS20B 


5 LAER ARERR REE EERE EERE ERE EERERERRAER AERA EEAEA ERR ER TES 


CEKBGC P11 K *BRK* & “DCF* FLAGS DURING POWERFAIL SEQ 0052 
2015 050305 BIS R3,R5 RS IS WHAT THE DCF REG. SHOULD LOOK LIKE 
$19 8 SOB R3, DELAY A SHORT WHILE 

1 17702 171400 MOV —aABR,R2 COPY DCF REGISTER 
18 CMP sR, RS EVERYTHING Ok? 
1 1405 BEQ 3$ BRANCH IF YES 
010 014250 MOV R2,$REG1 (RO) :THE DCF REG. 
1 01 014260 MOV R5,$REG2 (RO) ; WHAT IT SHOULD BE 
¢ 104021 ERROR 21 : INCORRECT DCF REG. BITS 
005 017012 3$: CLR NOPRMP (RO) 
4 104401 045163 TYPE ,1M111 Fett as AS EXPECTED 
10063. 014712 4$: ASRB SYNC .1 s;WAIT FOR POWER-UP 
103375 BCC 4$ 
7 005237 016766 INC LOG2 COUNT CPU'S GOING OUT 
023737 016766 016770 CMP LOG2,CPULS1 SALL DONE ? 
0014 BEQ ;YES = SKIP 
012737 000001 014712 MOV #1,SYNC.1 ZELSE LLET NEXT ONE IN 
1 00040 BR 7$ 
3 005037 016766 6$: CLR LOG2 ;LAST ONE INITS COUNTER 
012716 024674 7$: MOV #TST17, (SP) ; CONT INUE 
20 000002 RTI 
seee 
2037 
2038 
2039 SRR KR RRR EERE EERE EERE EERE EREREERRAREERER ERE ERE EE 
2040 TEST 20 CHECK POWERFAIL DURING HIGH MEMORY ACTIVITY 
2041 5 RARER ERE REE AEEEEEEER EERE EERE REREREKERERERERERE EERE EERE EE 
2042 025524 TST20: 
20435 025524 012777 000020 166436 MOV #20 ,aDISPLAY :SET TEST NUMBE 
ioe ssaaxkaeeeankekeee TSODA-FORK teexaennaeaaenkeeeeeeeneee 
soe 6 5532 C1608 014200 MOV S$$STP(RO), SP;SET UP_THE STACK 
loth 5536 052777 100000 171264 BIS WBIT15, @ACR INITIALIZE THE IIST 
025544 i 000122 70$: ASRB a69$ sENTER CONTROL FORK 
2049 025550 103575 BCC 70$ 
2050 025552 027737 000110 016774 CMP @67$ , CPUACT HAVE WE REACHED THE END OF THE 
2051 :ROUTING’ CYCLE? 
26 025560 001021 BNE 65$ BRANCH IF NO 
53 025562 013702 016774 MOV CPUACT ,R2 
2298 005302 DEC R2 
55 55 006302 ASL R2 3 (CPUACT~1) ®2 
28 025572 027702 000072 CMP a68$ ,R2 SARE WE AT THE END OF THE TEST? 
5576 001005 BNE 64$ BRANCH IF NO 
26 > 012777 000001 000064 MOV #1 a69$ = EXIT 
000137 026114 JMPsTS¥21 
361 7 000050 064$: ADD #2 a68$ ; INCREMENT 68% BY 2 
1 005077 000042 CLR = a@6/S CLEAR THE CHECKPOINT COUNTER 
4 005277 65$: INC a67$ > INCREMENT CHECKPOINT 
005037 014714 CLR SYNC .2 :CLEAR THE LOCK 
Og CMP RO, a68$ ROUTE | THIS PROCESSOR THROUGH TS20A? 
2065 66$ H IF NO 
a 
03 
02 


Oo 
% 
© 
—_ 
Nm 
—t 
WN 
™N 


3 
3 
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2071 67$: D1 

f = 

69$: D 

7% 000020 014002 TS20A: MOVB #20, $TSTNM(R1) 

75 017062 MOV RO,PUT :SET PROCESSOR UNDER TEST 

76 TST RO -1S THIS THE MASTER? 

BNE 5$ sBRANCH IF NO 
73 041713 TYPE _1M77 : TEST’! 
CLR -(SP) 
014002 MOVE STSTNM(R1),(SP) :GET THE TEST NO. 
re WORD 2 :TYPE 2 DIGITS, NC LEADING 0 
c08% 041724 TYPE ™100 -"POWERFAIL CPU # '' 

5 014226 MOV $CPUID (RO) ,-(SP) -:SAVE $CPUID(RO) FOR TYPEOUT 
2086 TYPDS ::G0 TYPE=-DECIMAL ASCII WITH SIGN 
208 014333 TYPE SSCRLF 
2088 014020 014612 MOV #SSU'TI'NCX,PFFT(RO) ;SEND SIGNAL ON UP, TIME,DON'T SAVE NN 

CLR R3 :SET FOR RTI RETURN 
3030 016726 016774 1$: CMP D1, CPUACT :MAKE SURE ALL CPU'S DONE WITH 

1 BNE 1$ :PREVIOUS CYCLE 
2092 014642 CLR SIGNAL =CLEAR THE POWER-UP SIGNAL 
209 000001 014714 MOV #1, SYNC.2 :UNLOCK THE OTHER CPUS 
2094 WAIT “WAIT FOR THE POWER TO FAIL 
2095 025524 JMP TST20 
3097 0 000020 014002 1TS208: MOVB #20, $TSTNM(R1):SET UP THE TEST NUMBER 

014714 ASRB _—s SYNC..2 :WAIT FOR SYNC. SIGNAL 

2099 BCC TS208 

2100 026022 005237 016764 INC L :COUNT CPU'S GOING THRU 

2101 023737 016764 016770 CMP LOG1,CPULS1 sLAST ONE HERE? 

2102 0260 001404 BEQ 3$ :YES - SKIP 

210 012737 000001 014714 MOV #1.SYNC.2 “ELSE LET NEXT ONE IN 

2104 a pe BR 4$ 

2105 005037 016764 3$: CLR LOG1 :LAST ONE INITS COUNTER 

2106 2 104401 014220 4$: TYPE »SNULL -FLUSH THE TYPE QUEUE 

107 012705 002000 1$: MOV #2000 ,R5 : INITIALIZE COUNTER 

108 011010 23: MOV (RO), (RO) 

2109 011010 MOV (RO), (RO) 

2110 O 011010 MOV (RO), (RO) 

2111 70 011010 MOV (RO). (RO) 
gi12 72 077505 SOB RS, 2$ 

113 74 106237 014642 ASRB = SIGNAL :SIGNAL RECEIVED? 

2114 026100 103366 BCC 1$ - NO, CONTINUE WITH CONTENSION 
2115 026102 012737 000001 014642 MOV #1,SIGNAL sOPEN LOCK FOR NEXT CPU 

gig 026110 000137 025524 JMP TST20 
2118 
2119 
2120 
2121 SERRE ARERR EAA ERE REE AAA RAE RRA ERAAAAARAREAAE TERED 
g12¢ =*TEST 21 CHECK POWERFAIL SEQUENCE DURING MASSBUS XFER 
182 5 LEAR AREER RERE RARER EREREREAREERERERERRARAARERA ARERR RARE EES 
2124 026114 TST21: 

2125 026114 012777 000021 166046 MOV #21, DISPLAY :SET TEST NUMBE 

2126 2 RRR TSZ21A-FORK sekekaeereaeekeneeeeeeeees 


ae 
RS 
v1 


: 


AAR AR RESP EEE RE PEP EPP E PPA E EEE REP PEPE E PRE RE EAE EEEEE Nem 
VLBIBIRARANVSSSGEALIRISSSNSARUN LS SENSES LESBNKGKENYLSVSY 
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ee ~80 16:04 121 CHECK POWERFAIL SEQUENCE DURING MASSBUS XFER SEQ 0054 
026122 01 014200 MOV SSSTP(RO) - SP:SET UP THE STACK 
126 052777 100000 170674 BIS #81115, s INITIALIZE THE IIST 
0 77 000126 70$: a ty sENTER CONTROL FORK 
000114 016774 CMP @67$, CPUACT sHAVE WE REACHED THE END OF THE 
:ROUTING CYCLE? 
BNE 65$ “BRANCH IF NO 
016774 MOV CPUACT,R2 
DEC R2 
ASL R2 = (CPUACT=1) #2 
000076 CMP a68$ ,R2 ‘ARE WE AT THE END OF THE TEST? 
BNE 64$ “BRANCH IF NO 
000001 009070 MOV #1, a69$ = s EXIT 
027076 JMP TST22 
000002 000054 64$: ADD : INCREMENT 68$ BY 2 
026210 005077 000046 CLR «= a6 7S ;CLEAR THE CHECKPOINT COUNTER 
026214 005277 000042 65S: INC a67$ > INCREMENT CHECKPOINT 
20 005037 014712 CLR SYNC. 1 “CLEAR ALL THE LOCKS 
026224 005037 014714 CLR SYNC.2 *CLEAR THE LOCK 
0 020077 000030 CMP RO, a68S “ROUTE THIS PROCESSOR THROUGH TS21A? 
026234 001005 BNE 66$ “BRANCH IF NO 
026236 012777 000001 000022 MOV #1,a69S “CLEAR LOCK 
026244 000137 026270 JMP TS21A : TO BRANCH TS21A 
026250 012777 000001 000010 66$: MOV ry =CLEAR LO 
026256 000137 026656 JMP TS21B JUMP TO TS21 
: KEKE AKAAAREEAEREAKRAEKARAAAAEAEAAEKEAAEEAKEAREEAEEAAEEAAREREEEE 
026262 016732 67$: E7 
026264 016734 68$: £2 
026266 017010 69$: €3 
026270 112761 000021 014002 TS21A: MOVB #21,  $TSTNM(R1) 
026276 010037 017062 MOV RO, PUT -SET PROCESSOR UNDER TEST 
026302 023737 016732 016774 4$: CMP E1. CPUACT :LET THE OTHER CPUS CATCH UP 
10 001374 BNE 4$ 
026312 005700 TST RO -1S THIS THE MASTER? 
026314 001007 BNE 5$ “BRANCH IF NO 
026316 104401 041713 TYPE ,TM77 :""TEST'' 
026322 005046 CLR =(SP) 
026324 116116 014002 MOVB $TSTNM(R1).(SP) :GET THE TEST NO. 
026330 104403 TYPOS 
02633e 000002 7 WORD 2 :TYPE 2 DIGITS. NO LEADING 0 
Oseazc 013702 016774 MOV CPUACT, R2 :CHECK FOR MASSBUS DEVICES ON OTHER CPUS 
026340 006302 ASL R2 
026342 005005 CLR RS 
026344 020205 1$: CMP R2, R5 
026346 001407 BEQ 2$ 
026350 022765 001400 014632 CMP #1400, MBDSW(RS) 
026356 001020 BNE 3$ 
026360 062705 000002 ADD #2, RS 
026364 000767 BR 1$ 
026366 104401 044147 2$: TYPE ,NODEV ;THERE ARE NO DEVICES TO TEST THIS CPU 
026372 016046 014226 MOV $CPUID(RO), “(SPD “SAVE $CPUID(RO) FOR TYPEOUT 
026376 104405 TYPDS -G0 TYPE=-DECIMAL ASCII WITH SIGN 


026400 104401 014333 TYPE ,SCRLF 





| 


me 
§ 


2 & 


Aeepe see eee eee 
BSLFSFACSLESELFRL 


S33 
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026720 


042021 
000001 


000002 


041724 
014226 


014333 
014020 
000001 


014642 
001400 


014650 
017042 
000050 
033540 


004000 
017042 


014650 


014642 
000001 
000001 
026114 
000021 
001400 
014714 


000001 
014220 
026114 


014714 


14612 
14712 
014632 


014714 


176700 


176700 


014642 
014714 


014002 
014632 


014714 


3$: 


P21: 


1$: 


2$: 


4$: 


5$: 


6$: 


TS21B: 


10$: 


1$: 


PDP-11/70 SYSTEM POWER FAIL 
6:04 T21 


TYPE 
MOV 


D 5 
MACY11 30A(1052) 
CHECK POWERFAIL SEQUENCE DURING MASSBUS XFER 


me 


13-MAR-80 16:04 PAGE 43 


SEQ 0055 


:"PROCEEDING TO NEXT CPU’ 
SYNC .2 
Rs ;BRANCH TO START OF TEST 


p2] ;BRANCH IF THERE IS A DEVICE ON ANOTHER CPU 
#2, RS -THE DEVICE IS ON THIS CPU ‘- 


:' POWER FAIL CPU # 
: SAVE SUID (RO) FOR TYPEOUT 
::G0 TYPE =_DECIMAL ASCII WITH SIGN 


» SCRL 
#SSU!T1INCXPFFT (RO) 


,™M102 
#1 


100 
$CPUID(RO). -(SP)° 


;SEND SIGNAL ON UP TIME, DON'T SAVE NN 
#1, SYNC.1 ;UNLOCK THE OTHER CPU'S 
SIGNAL “CLEAR THE POWER-UP SIGNAL 
R =COME UP VIA RTI 
#1400,MBDSW(RO) :DOES THIS CPU HAVE A MASSBUS DEVICE? 
1$ ;BRANCH IF YES 
WAIT FOR POWER TO FAIL 
#1, SYNC.2 :UNLOCK CPUS IF ANY. ARE LOCKED 
TST -GO TO CONTROL FORK 
BFADR(RO).R4 § :PUT ADDRESS OF BUFFER IN R4 
#70, @4RPCS1 “DO AR 
PC ,MBUSR “READ A RECORD 
CKSUM(RO) =CLEAR CHECKSUM LOCATION 
‘ : INITIALIZE A COUNTER 
BFADR R(RO).R4  :GET BUFFER POINTER = 
(R4)+,CKSUM(RO) PERFORM — 
CKSUM(RO) = CHECKSUM 
R2, ; LOOP 
BFADR(RO).R4  :LOAD BUFFER ADDRESS 
#50,a#RPCS1 “DO A WRITE CHECK 
PC .MBUSR “READ FROM MASS BUS DEVICE 
:CLEAR RS 
#4000 ,.R2 - INITIALIZE COUNTER 
BFADR(RO).R4 § :GET POINTER TO BUFFER 
(R4)+,R5 : PERF ORM 
RS > CHECKSUM 
R2.5$ im 
R5, CKSUM(RO) “EVERYTHING OK? 
&$ “BRANCH IF YES 
23 ;CHECKSUM IS WRONG 
SIGNAL 
4$ “NO CONTINUE XFERS 
a » SIGNAL SOPEN LOCK FOR OTHER CPU'S 
1_SYNC. 2 “UNLICK CPUS IF ANY ARE LOCKED 
TO CONTROL FORK 
1 STSTNM(RI) -SET THE TEST NUMBER 
#1400, MBDSW(RO) “DOES THIS CPU HAVE A MASSBUS DEVICE? 
1$ *BRANCH IF YES 
SYNC.2 “ELSE SET OUT THIS ROUND 
#1,SYNC.2 : OPEN LOCK FOR OTHERS 
,$NULL “FLUSH THE TYPE QUEUE 
tST21 JUMP INTO THE CONTROL LOOP 


ott Tt n-00 or Oe 


0267 


959075 


027076 
027076 


012777 
112761 


014650 
014712 


000001 
014220 
026114 


000022 
000022 
016776 
014542 
000001 


016774 


014540 
177776 
000000 


176700 


014712 


176700 


014642 


165064 
014002 


6776 
4542 


oo 
oud <a 


11/70 SYSTEM » on FAIL 


MOV BFADR(RO).R4 | ;PUT ADDRESS OF BUFFER IN R4 | 
MOV #70, aARPCS1 *DO A READ 
JSR PC LMBUSR “READ A RECORD | 
CLR CKSUM(RO) = CLEAR CHE CK SUM LOCATION 
MOV #4000,R INITIALIZE A COUNTER 
MOV BFADR(RO) .R4 GE? purktr POINTER 
2$: ADD (R4)+,CKSUM(RO) :P 
ADC CKSUM(RO) > CHECKSUM. 
SOB R3,2$ : LOOP 
7$: ASRB —s- SYNC... *HOLD UP 
BCC 7$ 
MOV #1,SYNC.1 :OPEN LOCK FOR OTHERS 
TYPE L “FLUSH T 
4$: MOV BFADR(RO).R4 § :LOAD BUFFER ADDRESS 
MOV #50, aA#RPCS1 :D0 A WRITE CHECK 
JSR PC MBUSR READ FROM MASS BUS DEVICE 
CLR R5 “CLEAR R5 
MOV #2000,R3 > INITIALIZE COUNTER 
MOV BFADR(RO).R4 § :GET POINTER TO BUFFER 
S$: ADD (R4)+,R5 * PERF 
ADC R5 = CHECKSUM 
SOB R3,5$ 
CMP R5.CKSUM(RO) § ; EVERYTHING OK? 
BEQ 6$ “BRANCH IF YES 
ERROR 23 = CHECKSUM IS WRONG 
6$: ASRB _—s SIGNAL 
BCC $ :NO CONTINUE XFERS 
MOV SIGNAL “OPEN LOCK FOR OTHERS 
JMP TST21 : JUMP INTO CONTROL LOOP 
KEKE KCKEKAAEKERAAEEAAEERERARAAAKEAAREEKEAAAEAEEEARAEEEERAEEETEEEERE 
TEST 22 CHECK AC POWERFAIL ON MEM BOXES, PORTS DISABLED 
EKA KEKE AAAEARAKEAAEAREAKEAREREREEAEREEAREREASEEEARER 
$122: 
MOV #22,aDISPLAY ;SET TEST NUMBER 
MOVB #22,  $TSTNM(R1) :SET THE TEST NUMBER 
2$: ASRE SYNC. 3 “CONTROL THE ENTRY 
INC ENTR22 : INCREMENT ENTER FLAG 
MOV #1, SYNC.3 “ALLOW THE OTHERS IN 
1$: CMP CPUACT, ENTR22 “ARE ALL CPUS HERE? 
BNE i$ “NOT YET 
CLR EXIT “CLEAR THE EXIT FLAG 
CLR PSw “SET KERNAL MODE 
CMP RO #0 “1S THIS THE MASTER? 
BNE TS22B “BRANCH IF NO 
BR TS22A “THIS IS THE MASTER 


= 
MACY11 30A(1052) 
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az 
: 


3 


Mmronrnronnrnnr 


SRIRR RGSS See 


WAAANAAANAA 
aod ced cod end cad eed ad ad nd ed 
WONOAULS WN © 


CLGGY 


Ww 
AAR 


2332 


0 
027324 
OST aes 
02 


0 
027350 


027352 


027452 





012777 
016006 


012737 
004737 


PDP-11/70 SYSTEM POWER FAIL 
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100000 
000022 


014200 
014612 


040630 
027326 
014540 
he 13 

120 


177572 
014536 


014522 


017012 
042052 


34 
014540 


030120 
00001 


167640 
164772 


014702 


TS22B: 


2$: 


TS22A: 


5$: 


5 
MACY11 301052) 


#B81T15, @ACR 
#22, @D 1 SPLAY 
SSSTP (RO) . SP 


RO 

5$ 

,1M77 

<(SP) 
STSTNM(R1), (SP) 


; BRANCH 
-"TEST’ e 


PWRFL 
BOOT 
MEMS IZ 


R2 

» @ACR 
@DISPLAY 
$§STP(RO). sa 
PFFT (RQ) 


13-MAR-80 
CHECK AC POWERFAIL ON MEM BOXES, PORTS DISABLED 


16:04 PAGE 45 
SEQ 0057. 


ee THE [IST 
TEST NUMBER 


‘INITIALIZE THE gs 

7SPECIFY THE POWER FAIL 

:SET A UNEXPECTED. TRAPS TO 4 
FOR POWER FAIL RETURN 

Ise, i THIS TEST? 


MAKE SURE a IS TURNED OFF 
:GO TO NEXT TEST 
: TIME TO a" 


;BRANCH IF NO 
;GET READY FOR RELOCATION 


;SLAVE IS NOW _IN HIGH CORE 
[CLEAR RELOCATION FLAG 

; CONTINUE TESTING 

:TIME TO _— 


:BRANCH | 

;RETURN TO LOW CORE 
:CLEAR THE FLAG 

: CONT INUE 


; SHOULD WE BE HERE? 
“BRANCH IF YES 
;UNEXPECTED CPU POWER FAIL 
; CONT INUE TESTING 

WANT TO IDENTIFY THE CPU 
“EXPECTED CPU POWER FAIL 
; CONTINUE TESTING 


zI1S THIS THE MASTER? 
IF NO 


;GET THE TEST NO. 


: TYPE 2 DIGITS, NO LEADING 0 


> SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 
>SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND | 
uh On ALL OME MEM 


; F NO 
: WE CAN'T DO THIS TEST 

:POINT TO BOX #7 

se a es THE [IST 
;SET THE TEST NUMBER 


:INIALIZE THE STACK 
:SPECIFY THE POWER FAIL 


ag 
¥ 


MrT 

AAAA AAA 
Ww Ww 

Ww —_ 


OEE 


epee gs 


MmMrnroenroenrerensnronsnronnrnnn 


SESSTETES 


P11 


027455 


027754 
027762 


(- mb ts at 
135-MAR-80 1 


040630 


000112 
000000 
030120 
014502 
000002 
000001 


014526 
033042 


043226 
030016 
014526 
020000 
000110 
164304 
033226 


164266 
014522 


047252 


164210 
177760 
000000 


167044 


014702 


000110 
014540 


014646 


000000 


167120 


167046 


3$: 


4$: 


wat and 
—O 
Pw 


135$: 


12$: 


17$: 


18$: 
14$: 


PDP-11/70 SYSTEM POWER FAIL 
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= 
MACY11 30A(1052) 


13-MAR-80 


16:04 PAGE 46 
SABLED 


CHECK AC POWERFAIL ON MEM BOXES, PORTS DI 


ay ven ERRTAB(RO) 


2 
3$ 
#112, #110 
avd 
#1. EXIT 
TST 
START (R2) 
10$ 
4$ 
#2, R2 
2$ 
#1, BOXNUM 
11 
BOOT 
103$ 
‘a RELOHI 
#1, HICORE 
#1, RELOUP 
HIBOX, KIPARO 
HIBOX, KIPAR1 
HIBOX, KIPAR2 
#1, 0 
PATCHK 
PC, PATTRN 
PC, BUF CLR 
1106 
R2 
R2, ~(SP) 
™108 
100$, R3 
12$ 
#2 , af0 
a#i10 
asTKS 
3$ 
#ENTR, alSTVEC 
4$ 
a$TKS 
12$ 
PWRFL 
18$ 
24 
102$ 
102$ 
SWR,  R4 
#177760, R4 
#PGTE, @ACR 


;SET FOR UNEXPECTED TRAPS TO 4 


;DID WE TEST ALL THE BOXES 


;BRANCH IF NO 

RESTORE LOC 110 

;RESTORE LOC 0 

; SIGNAL THE ee TO EXIT 
;GO TO THE NEXT TEST 


;WHAT DO WE KNOW ABOUT 
[BRANCH IF NOT THE BASE 


;BRANCH IF ITS THE BASE BOX 
; THERE WAS NO BOX-POINT TO THE NEXT LOWER BOX 


> CONT INUE 
sWAS THERE ONLY ONE MEM BOX? 


; BRANCH 


<SI 
:GET READY TO GO TO HIGH CORE 


IF YE 
:1S THIS THE DC TEST? 
CH _IF YES 


“10 TEST THE BASE BOX, 
SRELOCATE THE PROGRAM FIRST TO THE NEXT HIGHER B 
; TURN MM R-UP 


ON ON POWE 
GNAL SLAVES TO RELOCATE 


WE ARE 


;SET TO 


NOW IN HIGH CORE 
WRITE PATTERN 


SWRITE THE PATTERN maven 
:TELL THE OPERATOR TO POWER FAIL THE MEMORY BOX 


;SPECIFY THE CONDITIONS 


> SET 


UP THE POWER FAIL RETURN 
:TS i TEST? 


“MAKE BOOTING SLAVE SP=20000 


;HANG THE SLAVES BOOT 
:1S CHARACTER IN BUFFER? 


;LOOP 
:SET UP TO INTERRUPT SLAVES 
CONT INUE : 


:1S CHARACTER IN THE BUFFER? 

“SHOULD THE MASTER HAVE POWER FAILED? 
>BRANCH IF NO 

“FAILURE TO POWER FAIL 
CONT INUE 


:GET THE SWITCH VALUES 
E ONLY CPU BITS 


; SAV 
SACCESS PG 


TE REG 


:SET INTERRUPT BITS 


THIS BOX? 
BOX 


SEQ 0058 | 


H 5 
MACY11 30A(1052) 
CHECK AC POWERFAIL ON MEM BOXES, 


WBITO, CPUACT 
15$ 

1 @ADR 
103$ 
#3 @ADR 
103$ 
PWRF L 

1018 

102$ 
NOPRMP (RO 
_T™M103 
#1, PATCHK. 
PC, PATTRN 
#1. 0 
104$ 
PC, RELOLO 
#1. RELODN 
MMRO 

HI CORE 
R5 
RS, : 
#2, R2 

2$ 


13-MAR-80 


> 


16:04 PAGE 47 
PORTS DISABLED 


;EVEN OR ODD? 
:BRANCH IF EVEN 
; INTERRUPT ING AN EVEN NUMBER OF SLAVES 


SEQ 0059 


“INTERRUPT ING AN ODD # OF SLAVES 


;DID WE EXPECT POWER FAIL? 
;BRANCH IF YES 


;MASTER ERROREOUSLY POWER FAILED 
; CONTINUE 
SALLOW CPU Boog * ae 


;CPU POWER FAIL MS 
:SET UP FOR attEoe CHE CK 


;BRANCH IF NO 

sELSE RELOCATE 

;SIGNAL THE SLAVES 

: WE ARE NOW BACK DOWN IN LOW CORE 
;MAKE SURE MM ON POWER-UP DISABLED 
;MAKE TS22A DELAY | 


:POINT TO NEXT BOX 
ONT INUE 


© = RRA REARAAAERAAEEEEAEAEAAAEEAEKEAAEAEEAEAREEEEREREEAEEAEEEEEEEE 


CHECK AC POWERFAIL ON MEM BOXES, PORTS ENABLED 


SS RRERERRAERRAEEEAEREREREEAAAERAAEREREEARRAERAEAEARERERAERARERERARE EERE RH 


#23, QDI SPLAY 


MAINDEC= 1 owe SYSTEM POWER FAIL 

CEKBGC .P11 6:04 T22 
2407 0277 032737 000001 016774 BIT 
2408 0 5990 901406 BEQ 
2409 7776 012777 000001 167026 MOV 
2410 0 BOSS Bre 
411 O 012 000003 167016 15$: MOV 
sc) 030014 16 BR 
2414 030016 005737 014522 100$: TST 
2415 0 001002 BNE 
2416 030024 104001 ERROR 
2417 O 000404 
2418 0300 005 017012 101$: CLR 
2419 030034 104401 042052 TYPE 
2420 030040 012737 000001 014530 102$: MOV 
2421 030046 004737 032700 JSR 
2422 030052 032737 000001 177572 +1038: + «BIT 
2423 0 001411 BEQ 
2424 0 004737 033166 JSR 
2425 0 012737 000001 014536 MOV 
2426 030074 005037 177572 CLR 
2427 030100 005037 014532 CLR 
2428 0301 5005 104$: CLR 
2429 030106 077501 SOB 
2430 030110 162702 000002 SUB 
2431 030114 137 027432 JMP 
2432 
2433 
243%4 
2435 
2436 
2437 
2438 
2439 “% 
2440 :*TEST 23 
2441 : 
2442 030120 TS123: 
Soar 030120 012777 000023 164042 
2445 030126 112761 000023 014002 MOVB 
2446 030134 106237 016776 23: ASRB 
2447 030140 103375 BCC 
2448 030142 005237 014544 INC 
2449 0350146 012737 000001 016776 MOV 
2450 030154 023737 016774 014544 1S: CMP 
2451 030162 001374 BNE 
2452 030164 005037 014540 CLR 
2453 030170 005037 177776 CLR 
2454 030174 020027 000000 CMP 
2455 030 001001 BNE 
$429 030202 000474 BR 
2458 030 052777 100000 166616 1S23B: BIS 
2459 030212 012777 000023 163750 MOV 
2460 0302 016006 014200 MOV 
2461 030224 005060 014612 CLR 
2462 0302 012760 040630 014702 MOV 


#23, 
SYNC .3 


2 

ENTR23 

#1, SYNC. 3 
ai T, ENTR23 


7: @ACR 


4 @DISPLAY 
$SSTP(RO), SP 


(RO) 
ACPUER, ERRTAB(RO) 


;SET TEST NUMBER 
STSTNM(R1) 


;SET THE TEST NUMBER 
> CONTROL THE ENTRY 


; INCREMENT ENTER FLAG 
;ALLOW THE OTHERS IN 
7ARE ot CPUS HERE? 


SCLEAR THE EXIT FLAG 

:SET KERNAL MODE 

:IS THIS THE MASTER? 

“BRANCH IF NO 

: THIS IS THE MASTER 

eG: THE IIST 
TEST NUMBER 

STNITIALIZE THE oA 


:SPECIFY THE POWER FAIL 
;SET FOR UNEXPECTED. TRAPS TO 4 
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ee Oa 
CHECK AC POWERFAIL ON MEM BOXES, PORTS E 


CEKBGC .P11 SEQ 0060 


2463 0302% sere 030350 MOV #100$, R35 ;SET FOR POWER FAIL RETURN 
2464 0302462 0057357 014540 TST EXIT :FINISHED WITH THIS TEST? 
2465 0350246 0014 BEQ 1$ ; CH IF NO 
Pg. 0 005037 177572 CLR 0 s;MAKE SURE MM is TURNED OFF 
2467 0350254 000157 031142 JMP TST24 ;GO TO NEXT TEST 
2468 030 005737 014534 1$: TST RELOUP + TIME TO RELOCATE? 
2469 0 bet BEQ 2$ CH IF NO 
26470 0 004737 032 JSR PC, SE TMM “GET READY FOR RELOCATION 
2471 030272 0637357 014550 172340 ADD HIBOX, KIPARO 
sore 030 063737 014550 172342 ADD HIBOX, KIPARI 
oh 030306 ee 737 014550 172344 ADD HIBOX, KIPAR2 
474 OepRos 052737 1 177572 BIS #1, 0 SLAVE IS NOW_IN HIGH CORE 
475 0303522 005037 014534 CLR RELOUP ;CLEAR RELOCATION FLAG 
2476 Oetees 000726 BR TS238 : CONTINUE TESTING 
2477 0305 005737 014536 2$: TST RELODN : TIME TO RELOCATE? 
2478 030334 0017235 BEQ TS238 BRANCH IF NO 
2479 030336 005037 177572 CLR MMRO ;RETURN TO LOW CORE 
2480 0350342 005057 0145356 CLR RELODN ;CLEAR THE FLAG 
stm 030346 716 BR TS238 : CONT INUE 
24835 030350 005737 014522 100$: TST PWRF L ; SHOULD WE BE HERE? 
248 0350354 001002 BNE 101$ “BRANCH IF YES 
2485 0303 104001 ERROR 1 UNEXPECTED CPU POWER FAIL 
2486 050360 000711 BR TS238 bet TESTING 
2487 030362 005060 017012 101$: CLR (RO) T TO IDENTIFY oe CPU 
2488 030 104401 042052 TYPE .1M103 “EXPECTED CPU POWER FAIL 
9g 030372 000704 TS238 : CONTINUE TESTING 
2491 
2492 
24935 030374 TS23A: 
2494 030374 005700 TST RO :1S THIS THE MASTER? 
2495 030376 001 BNE $ BRANCH IF NO 
2496 030400 104401 041713 TYPE .1M77 esr 
2497 030404 00504 CLR -(SP) 
2498 030406 116116 014002 MOVB STSTNM(R1).(SP) ;GET THE TEST NO. 
2499 030412 10440 TYPOS 
S250 Oepele $$ WORD 2 ;TYPE 2 DIGITS, NO LEADING 0 
2502 030416 012737 000001 014522 MOV #1, PWRFL :SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 
2503 030424 012737 000000 014526 MOV ° BOOT >SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND | 
2504 03504 004737 032342 JSR PC, MEMSIZ ;FIND ALL THE MEM BOXES 
2505 030436 005737 014540 TST EXIT sWAS ONLY ONE MEM BOX FOUND? 
2506 030442 001402 BEQ 1$ s;BRANCH IF NO 
2507 0350444 137 031142 JMP TST24 ;WE CAN'T DO THIS TEST 
2508 0350450 012702 000016 1$: MOV #16, R2 :POINT TO BOX #7 
2509 030454 2777 100000 166346 2$: BIS #B1T15, @ACR INITIALIZE THE LIST 
2510 030462 012777 000023 163500 MOV #23, @DISPLAY 7SET THE TEST NUMBER 
2511 030470 014200 MOV $$STP(RO), SP : INIALIZE THE STACK 
S2i¢ 030474 5060 014612 CLR PFFT (RO) ‘3 THE POWER 
2513 030500 012760 040630 014702 MOV A#CPUER, ERRTAB(RO) ;SET FOR UNEXPECTED TRAPS TO 4 
2514 030506 005702 TST R2 :DID WE TEST ALL THE BOXES 
2515 030510 002012 BGE 3$ :BRANCH_ IF NO 
2516 030512 012737 000112 000110 MOV #112, a#i10 :RESTORE LOC 110 
2517 9305 005037 000000 CLR >RESTORE LOC 0 
2518 030524 012737 000001 014540 MOV #1, EXIT ; SIGNAL THE SLAVES TO EXIT 


MAINDEC-11-CE 
CEKBGC .P11 


™m 
Ww 
—_ 
Oo 


Wn 


MATA 


Mroenrrenrenroeneny rr 
CROWN UNUN ur + - 


Nm 
nr 
iF 
Ww 


PAS GIR IRNNIN 
oOoO0o0°o oO 


gta 
000002 
000001 
014526 
033042 


042600 
031040 
014526 
020000 
000110 
163262 
035226 
163244 
014522 


047252 


163166 
177760 


000000 
166022 
000001 


000001 
000003 


014646 


166076 


166024 
016774 
166004 
165774 
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3$: 


4$: 


— 
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AWA 


13$: 


12$: 


17$: 


18$: 
14$: 


15$: 


J 3 
MACY11 30A(1052) 
HECK AC POWERFAIL ON MEM BOXES, PORTS ENABLED 


TST24 
START (R2) 
10$ 


R2 
BOXNUM 


@ISTVEC 


aACR 


@ADR 
CPUACT 


@ADR 
@ADR 
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;GO TO THE NEXT TEST 
;WHAT DO WE KNOW ag LL BOX? 


; BRAN 
; BRANCH IF ITS THE BASE 
; THER 


BOX 
E WAS NO BOX-POINT TO THE NEXT LOWER BOX 
; CONT INUE 
;WAS THERE ONLY ONE MEM BOX? 


;BRANCH IF YES 
71S THIS THE DC TEST? 
CH E 


;BRANCH IF YES 
:TO TEST THE BASE 


BOX, 
“RELOCATE THE PROGRAM FIRST TO THE NEXT HIGHER B 
; TURN MM ON ON POWER-UP 
SLAVES TO RELOCATE 


: SIGNAL 
‘GET READY TO GO TO HIGH CORE 


;WE ARE NOW IN HIGH CORE 


;SET TO WRITE PATTERN 
[WRITE THE PATTERN 
-CL EAR THE KEYBOARD BUFFER 
;TELL THE OPERATOR TO POWER FAIL THE MEMORY BOX 


:SPECIFY THE CONDITIONS 
[SET UP THE POWER FAIL RETURN 
71S THIS THE DC TEST? 


BRANCH IF NO 

“MAKE BOOTING SLAVE SP=20000 
HANG THE SLAVES BOOT 

71S CHARACTER IN BUFFER? 


zL 
7SET UP TO INTERRUPT SLAVES 
ONT INUE 


is CHARACTER IN THE BUFFER? 
“SHOULD THE MASTER HAVE POWER FAILED? 
“BRANCH IF NO 
“FAILURE TO POWER FAIL 
TINUE 


:GET THE SWITCH VALUES 
:SAVE ONLY CPU BITS 
:ACCESS PGTE REG 
:SET INTERRUPT BITS 

OR ODD? 


IF EVEN 
; INTERRUPT ING AN EVEN NUMBER OF SLAVES 


® INTERRUPT ING AN ODD # OF SLAVES 


SEQ 0061 


- 
MACY11 30A(1052) 


MA INDE C-11-CEKBG-¢ PDP=-11/70 SYSTEM POWER FAIL 13-MAR-80 16:04 PAGE 50 
CEKBGC.P11 | 13-MAR=80 16:04 123 CHECK AC POWERFAIL ON MEM BOXES, PORTS ENABLED 
2575 
2576 031040 005737 014522 100$: TST PWRFL :DID WE EXPECT POWER FAIL? 
2577 031044 001002 BNE 101$ ; BRANCH IF YES 
2578 031046 104001 ERROR MASTER ERROREOUSLY POWER FAILED 
2579 031050 000404 BR 102$ + CONT INUE 
2580 031052 005060 017012 101$: CLR NOPRMP (RO) *ALLOW CPU {DENTIFICATION 
2581 031056 104401 042052 TYPE  ,TM103 “CPU POWER FAIL MSG 
2582 0 1062 012737 1 014530 102%: MOV #1, PATCHK “SET UP FOR PATTERN CHE CK 
2583 0310 004737 032700 JSR PC, PATTRN * CHECK THE PATTERN 
2584 031074 032737 000001 177572 103$: BIT #1. MMRO “ARE WE IN HIGH CORE? 
2585 031102 001411 BEQ 104$ “BRANCH IF NO 
2586 031104 737 033166 JSR PC, RELOLO “ELSE RELOCATE 
2587 031110 012737 000001 014536 MOV #1. RELODN “SIGNAL THE SLAVES 
2588 031116 005037 177572 CLR MMRO : NOW 8 BACK DOWN IN LOW CORE 
2589 031122 005037 014532 CLR HI CORE “MAKE SURE MM ON POWER~UP DISABLED 
2590 031126 005005 104$: CLR R5 “MAKE TS23A DELAY 
3591 031130 077501 SOB R5, ; 
2592 031132 162702 000002 SUB #2, R2 :POINT TO NEXT BOX 
2595 031136 137 030454 MP 2$ * CONT INUE 
2595 
2596 
2597 
2598 
2599 
2600 SRA RARER EERE REE EEE ERE ARR ERE ERE ER EERE EEREEREERE RE 
2401 “TEST 24 CHECK DC POWERFAIL ON MEM BOXES, CPUS BOOT ON POWER UP 
2602 5 RARER EERE RERERERREREREERRRRERER ER ERR EEE 
2605 031142 TST24: 
2604 031142 012777 000024 163020 MOV #24,@DISPLAY  ;SET TEST NUMBER 
2606 031150 112761 000024 014002 MOVB #24,  $TSTNM(R1) :SET THE TEST NUMBER 
2607 031156 106237 016776 2$: ASRB _—s SYNC.3 >CONTROL THE ENTRY 
2608 031162 103375 BCC 
2609 031164 005237 014546 INC ENTR24 : INCREMENT ENTER FLAG 
2610 031170 012737 000001 016776 MOV #1, SYNC. 3 “ALLOW THE OTHERS IN 
2611 031176 023737 016774 014546 1S: CMP CPUACT, ENTROG SARE ALL CPUS HERE? 
2612 031204 001374 BNE i$ YET 
2613 031206 005037 014540 CLR EXIT “CLEAR THE EXIT FLAG 
2614 031212 005037 177776 CLR PSW =SET KE 
2615 031216 020027 000000 CMP RO #0 “IS THIS THE MASTER? 
2616 031222 001001 BNE TS24B *BRANCH IF NO 
2617 031224 7h, BR TS26A ‘THIS IS THE MASTER 
2619 031226 052777 100000 165574 1S24B: BIS WBIT15, @ACR : INITIALIZE THE IIST 
2620 031234 012777 162726 MOV #24, | @DISPLAY TEST NUMBER 
2621 031242 016006 014200 MOV $$STP(RO), SP HINITIALIZE THE STACK 
2622 031246 005060 014612 CLR PFFT *SPECIFY THE POWER FAIL 
2623 031252 012760 040630 014702 MOV #CPUER, ERRTAB(RO) “SET FOR UNEXPECTED TRAPS TO 4 
4 031260 012703 031372 MOV #100$, R3 “SET FOR POWER FAIL RETURN 
2625 031264 005737 014540 TST EXIT “FINISHED WITH THIS TEST? 
2626 031270 001404 BEQ 1$ “BRANCH IF NO 
2627 031272 005037 177572 CLR MMRO ‘MAKE SURE A IS TURNED OFF 
2628 031276 000137 032164 JMP TST25 -GO TO NEXT TEST 
2629 031302 005737 014534 1$: TST RELOUP “TIME TO RELOCATE? 
2630 031306 001421 BEQ $ “BRANCH IF NO 


SEQ 0062 


5 
aie PDP-11/70 SYSTEM POWER FAIL MACY11 3044053) 13-MAR-80 16:04 PAGE 51 
1 -80 16:04 1724 


CEKBGC .P11 16 CHECK DC POWERFAIL ON MEM BOXES, CPUS BOOT ON POWER UP SEQ 0063 
2631 o3} 10 ect e le 032604 JSR PC, SE TMM :GET READY FOR RELOCATION 
26 031314 3 014550 172340 ADD HIBOX, KIPARO 
26 31 3737 014550 172342 ADD HIBOX, KIPARI 
031 O83 014550 172344 ADD HIBOX, KIPAR2 
5 0351 0 $f 7 000001 177572 BIS #1, MMRO ;SLAVE IS NOW IN HIGH CORE 
031 005037 014534 CLR RELOUP :;CLEAR RELOCATION FLAG 
031 28 000726 BR T ; CONTINUE TESTING 
$¢ 031352 005737 014536 2$: TST RELODN : TIME TO RELOCATE? 
39 031356 001723 BEQ :BRANCH IF NO 
2640 0351 005037 177572 CLR MMRO sRETURN TO LOW CORE 
2641 031 005037 014536 CLR RELODN :CLEAR THE FLAG 
sone 031370 000716 BR TS24B : CONT INUE 
2644 031372 005737 014522 100$: TST PWRF L ; SHOULD WE BE HERE? 
2645 031376 001002 BNE 101$ s;BRANCH IF YES 
2646 03514 104001 ERROR 1 ; UNEXPECTED ae POWER FAIL 
2647 031402 000711 BR TS24B ; CONTINUE TESTING 
2648 031 005060 017012 101$: CLR NOPRMP (RO) * WANT TO IDENTIFY THE CPU 
2649 031410 104401 042052 TYPE ,™™103 sEXPECTED CPU POWER FAIL 
$929 031414 000704 BR T8248 : CONTINUE TESTING 
2652 
2653 
2654 031416 TS24A: 
2655 031416 005700 TST RO 21S THIS THE MASTER? 
2656 031420 001007 BNE 5$ CH IF NO 
2657 031422 104401 041713 TYPE ~1M77 -" TE 4 ly 
2658 031426 005046 CLR -(SP) 
2659 031430 116116 014002 MOVB STSTNM(R1),(SP) ;GET THE TEST NO. 
2660 031434 104403 TYPOS 
2661 031436 000002 -WORD 2 sTYPE 2 DIGITS, NO LEADING 0 
2662 031440 S$: 
2663 031440 012737 014522 MOV #0, PWRFL :SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 
2664 031446 012737 000001 014526 MOV #1, BOOT : SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND I 
2665 031454 004737 032342 JSR PC, MEMSIZ :FIND ALL THE MEM BOXES 
2666 005737 014540 TST EXIT :WAS ONLY ONE MEM BOX FOUND? 
2667 031464 001402 BEQ 1$ :BRANCH IF NO 
2668 031466 000137 032164 JMP TST25 :WE CAN'T DO THIS TEST 
2669 031472 012702 000016 1$: MOV #16, R2 :POINT TO BOX #7 
2670 031476 052777 100000 165324 2$: BIS #B1T15, @ACR : INITIALIZE THE IIST 
2671 031504 012777 000024 162456 MOV #24, a@DISPLAY :SET THE TEST NUMBER 
2672 031512 016006 014200 MOV $$STP(RO), SP : INIALIZE THE STACK 
2673 031516 005060 014612 CLR PFFT (RO) sSPECiEY THE POWER FAIL 
2674 031522 012760 040630 014702 MOV #CPUER, ERRTAB(RO) :SET FOR UNEXPECTED TRAPS TO 4 
2675 031530 005702 TST R2 “DID WE TEST ALL THE BOXES 
2676 031532 002012 BGE 3$ =BRANCH IF NO 
2677 031534 012737 000112 000110 MOV #ii2,  a110 :RESTORE LOC 110 
2678 031542 005037 000000 CLR a0 “RESTORE LOC 0 
2679 031546 012737 000001 014540 MOV 41, EXIT = SIGNAL THE SLAVES TO EXIT 
031554 000137 032164 JMP TST25 :GO TO THE NEXT TEST 
2681 031560 005762 014502 3$: TST START (R2) sWHAT DO WE KNOW ABOUT THIS BOX? 
2682 031564 003037 BGT 10$ :BRANCH IF NOT THE BASE BOX 
26835 031566 001403 BEQ 4$ -BRANCH IF ITS THE BASE BOX 
2684 031570 162702 000002 SUB #2, bed : THERE WAS NO BOX-POINT fO THE NEXT LOWER BOX 
2685 031574 4 BR 2$ * CONT INUE 
2686 031576 022737 000001 014646 4$: CMP #1, BOXNUM WAS THERE ONLY ONE MEM BOX? 
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000000 
165000 
000001 


000001 
000003 


014522 


017012 
042052 


MEMO 


000000 


165054 


165002 
016774 
164762 
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128: 


17$: 


18$: 
14$: 


15$: 


100$: 


101$: 


5 
MACY11 30a(1053) 
CHECK DC POWERFAIL ON MEM BOXES, CPUS BOOT ON POWER 


11$ 
BOOT 
103$ 
PC, REL OHI 
#1, HI CORE 
1, RELOUP 
HIBOX, KIPARO 
HIBOX, KIPAR1 
HIBOX, KIPAR2 
i. 0 
PATCHK 
PC, PATTRN 
PC, BUFCLR 
1106 
R2 
R2, -(SP) 
2 
.1M110 
#100$, R3 
BOOT 
12$ 
#20000, av0 
av110 
a$Tks 
3$ 
WENTR, @ISTVEC 
4$ 
asTks 
12$ 
PWRFL 
18$ 
24 
102$ 
OK. 
102$ 
aSwR.  R4 
#177760, R4 
#PGTE, @ACR 
R4, @ADR 
#BITO, CPUACT 
15$ 
#1 @ADR 
103$ 
#3 @ADR 
103$ 
PWRF 
1018 
102$ 
NOPRMP (RO) 
M103 


13-MAR~-80 


16:04 PAGE fp 


BRANCH IF YES 
‘TS THIS THE DC TEST? 
CH _IF YES 


; RELOCATE 
; TURN mm 


‘TO TEST THE BASE 


;WE ARE NOW IN HIGH CORE 


;SET TO WRITE PATTERN 


:1$ CHARACTER IN THE BUFFER? 
“SHOULD THE MASTER HAVE POWER FAILED? 
:BRANCH IF NO 
“FAILURE TO POWER FAIL 
CONT INUE 


“BRANCH IF EVEN 
“ INTERRUPTING AN EVEN NUMBER OF SLAVES 
‘INTERRUPTING AN ODD # OF SLAVES 





SEQ 0064 


BOX, 
THE PROGRAM FIRST TO THE NEXT HIGHER B 


ON ON POWER-UP 
SIGNAL SLAVES TO RELOCATE 
‘eer READY TO GO TO HIGH CORE 


BUFFER 
:TELL THE OPERATOR TO POWER FAIL THE MEMORY BOX 


: SPECIFY THE CONDITI 
;SET UP THE POWER FAIL RETURN 


+S — THE DC TEST 
H IF NO 


“MAKE BOOTING SLAVE SP=20000 
“HANG THE SLAVES BOOT 

: :1S CHARACTER IN BUFFER? 
“SET UP TO INTERRUPT SLAVES 
CONT INUE 


ONS 


T? 


2GET THE SWITCH VALUES 
ONLY C 


PU BITS 
“ACCESS PGTE REG 
:SET INTERRUPT BITS 
VEN OR ODD? 


:DID WE EXPECT POWER FAIL? 
:BRANCH IF YES 
MASTER ERROREOUSLY POWER FAILED 
:ALLOW CPU IDENTIFICATION 

AIL MSG 


:CPU POWER F 


MAINDEC-11-CE Ohad SYSTEM POWER FAIL 
CEKBGC .P17 KOT nar- 80 16:04 T24 CHECK 
2743 032104 012737 000001 014530 102$: MOV 
2744 032112 ee 032700 JSR 
2745 116 ye 7 000001 177572 103%: + BIT 
2746 124 1411 BEQ 
2747 126 pte ta 033166 JSR 
748 0321 One? 7 000001 014536 MOV 
749 052140 005037 177572 CLR 
sie 032144 005037 014532 CLR 
751 8 150 005005 104$: CLR 
$726 152 077501 SOB 
2753 032154 162702 000002 SUB 
Les: 032160 000137 031476 JMP 
sh2$ 
757 
2758 
2759 
2760 
e 
os TEST 25 
$fee 
765 032164 +$125 
2766 032164 012777 000025 161776 MOV 
2767 032172 112761 000025 014002 MOVB 
2768 Oassne 032770 000400 014160 BIT 
2769 032 001002 BNE 
2770 032210 000137 035326 JMP 
2771 032214 1$: 
$78 032214 020027 000000 CMP 
2773 032220 001002 BNE 
2774 032222 000137 032232 JMP 
2775 032 000137 032264 64$: JMP 
2776 032232 TS25A: 
2777 32 005700 TST 
2778 34 001007 BNE 
2779 032236 104401 041713 TYPE 
2780 032242 00504 CLR 
2781 032244 116116 014002 MOVB 
siee 032250 10440 TYPOS 
2783 032252 00000 WORD 
2784 032254 S$: 
2785 032254 104401 014333 TYPE 
es) 0 104401 042115 TYPE 
2 0 012760 004000 014612 TS25B: MOV 
Mk g 72 005003 CLR 
27 74 005037 014714 CLR 
2790 0 1 WAIT 
2791 0 2 1 37 016776 3$: ASRB 
se 032 103375 BCC 
279 OaSe, 005237 014714 INC 
2794 032314 012737 000001 016776 MOV 
2795 B35 2 0235737 016774 014714 1$: CMP 
$738 323 001374 BNE 
2797 032332 104401 014220 TYPE 
2798 032336 000137 035326 JMP 


N 5 
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K DC POWERFAIL ON MEM BOXES, CPUS BOOT ON POWER UP 


PATCHK 


PATTRN 
MMRO 


RELOLO 
RELODN 
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;SET UP_FOR Ae A CHE Ck 
:CHECK THE PATTERN 
; ARE WE IN HIGH CORE? 
; CH_IF NO 
ELSE RELOCATE 
;SIGNAL THE SLAVES 
; a BACK DOWN IN LOW CORE 


WE AR 
“MAKE SURE MM ON POWER-UP DISABLED 
“MAKE SBCA DELAY 


;POINT TO NEXT BOX 
CONT INUE 


SRR RE EEREAKERAKEKERERERERERERAERERRRER RRR EERE 


CHECK SYSTEM RECOVERY ON AC POWER FAIL 


RAE KEAAKEEEEAEKRAAKEEEAEEAEAAAKKEEEEEKEEEKAKEREREEEEREEKEEEAERKEREEEE 


aoe. @DISPLAY 


Ass, 
seop 
RO, #0 
64$ 
TS25A 
TS25B 
RO 
S$ 
1M77 


~(SP) 
STSTNM(R1) , (SP) 


2 


a 


ATI, 


R3 

SYNC .2 

SYNC. 3 

3$ 

SYNC .2 

#1, C.5 
CPUACT, SYNC.2 
. SNULL 


$SEOP 


. SCRLF 
M104 


STSTNM(R 
@SWR (RO) 


PFFT(RO) 


SYNC 


;SET TEST NUMBER 


1) ;SET THE TEST NUMBER 


; SKIP THIS TEST? 
H IF NO 
sELSE 60" TO FOP 
;SWITCH THIS PROCESSOR? 


:BRANCH IF NO 
7YES, SWITCH TO A. 


:NO, SWITCH TO B. 


71S THIS THE MASTER? 
; BRANCH IF NO 
lest: - 


;GET THE TEST NO. 


TYPE 2 DIGITS, NO LEADING 0 


;"POWER FAIL ENTIRE SYSTEM’ 


;WAIT FOR POWER TO FAIL 
;CONTROL THE CPUS 


;COUNT THE CPUS 
sALLOW ANOTHER IN 


;GO TO END OF PASS 


SEQ 0065 


MA INDE 
CEKBGC .P 


2799 


— 


WONAUS WO 


eee eer 


ote 


BRPRRESGGUac Rac 


Bees 


08030308 
Fan 


FRSA 


Peeper ea 


eee ele ololelealelelelojlelolelola) 
Nm 


172100 
014646 


032476 
000010 
014462 
0144 
177 
014502 
177000 
014502 
014503 
$14063 
000012 
014462 
014502 
014646 
014502 
014502 
177777 


014522 
044206 
000001 


161416 
161412 


172340 
077406 


000200 
077406 
000400 
077406 
177600 
077406 
000020 
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014702 


014462 
014502 


014462 


014550 
014502 


014702 
014646 


014540 


#172100, 
BOXNUM 


MACY11 30A 5058) 13-MAR-80 
CHECK SYSTEM RECOVERY ON AC POWER FAI 


R4 


#100$, ERRTAB(RO) 
10 R4 


4 
(R4)+, STOP(R2) 
STOP (R2) 
{RG) 

+ 
#177000 
START (R2) 


R 
START (R2) 
R5 


RS, ST 
START(R2), 
BOXNUM 
START (R2) 
START(R2), 
101$ 

START (R2) 
SP 


’ S 

START (R2) 
START(R 
R5 


R 
STOP(R2 
a 


& Ou, 
#77406, KIPDR7 
20, MMR 3 


(R2) 
laos 


HIBOX 


ERRTAB(RO) 
BOXNUM 


KIPAR7 





esas PAGE 54 
THE START AND STOP TABLES 
RST CSR 


OR NO BOX 
O GET BOX CAPACITY 
TOP(R2) ;NOW WE E | 

: GET THE STARTING ADR. 
;MAKE IT LOOK LIKE A PAR 


;DO THE SAME FOR STOP 


OP=START+CAPACITY 

; INCREMENT BOX COUNT 

71S THIS THE BASE BOX? 
;BRANCH IF YES 

:GET A BOX TO RELOCATE TO 
NDICATE NON-E 
:POINT TO NEXT TABLE LOCATIONS 
-HAVE WE LOOKED FOR EIGHT BOXES? 
: H IF NO 
sRESET TRAP TO 4 
-WAS THERE MORE THAN A SINGLE BOX? 
7BRANCH IF YES 

71S THIS TEST 23? 

;BRANCH IF YES 

sPRINT ONLY ONE BOX MSG 

:SIGNAL TO EXIT 


71S THE BUFFER EMPTY? 
;BRANCH IF YES 


:SET UP PARS 0,1.2.7 


MA INDE 


g pone 
EReE eEaeS | 
elejeleolejleojlelele)lelelelelelele)<) 


BOBS 
ANS 


B33333 


333 


C1 
«P11 


oni 


1-Ceney-< 
15-MAR-80 1 


012737 
000207 


012524 
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033534 


014526 
014502 


060000 
014462 
014530 


152525 
152525 


172346 


100000 
000200 


177572 


032604 
040630 
014550 
077406 
014550 

200 
077406 
014550 
000400 
077406 
060000 
000001 
060000 
177572 


000250 


014250 


172346 


014702 


172312 


177572 


172350 
172352 


MEMORY 


PATTRN: 


RELOHI : 


RELOLO: 


1$: 


BX TEST 


C 
MACY11 30a 1059) 13-MAR-80 16:04 PAGE 55 
ROUTINES 


AMMERR, MMVEC 
PC 


BOOT 
7 


$ 
START (R2) 


STAR 
777406. 


SE TMM 
‘og? 
PDR3 


KIPAR3 


#CPUER, ERRTAB(RO) 
#) “ie? 


#6 
erpRD) 


6$ 
PAT CHK 
3$ 
#152525 


#152525. 


KIPAR3, 


#100000, 


#200, 
1 


#4 
#60000, R4 


R5 
(R5)+, 


KIPAR3 


(R5) 
(R5)+ 
$REG1 (RO) 


R5 
KIPARS 


SE TMM 
a 


KIPARS 
KIPARS 


(R4)+ 


ARE WE DOING THE DC TEST? 
;BRANCH IF YES 

SARE WE DOING THE BASE BOX? 
; BRANCH ae YES 

;SET UP PARS 0,1,2,7 

;USE PARS T 0 WRITE PATTRN 


;SET von te UNEXPECTED TRAPS 
:POINT TO PAR3 SPACE 


:1S THIS THE END OF THE BOX? 
;BRANCH IF YES 

: ARE WE i oe A PATTERN? 
URITE. THE PATTERN 


:IS 


VE THE 


Y READING IT 


THE PATTERN CORRECT? 
CH IF YES 
BAD ADDRESS (PAR) 


“SA 

:MEMORY IS ae & Sa 
REPORT ONLY ONE E 

SARE WE STILL IN BARS. SPACE ? 
; BRANCH 


sEND MM 
;RETURN 


IF YES 
sELSE RESET THE PAR 
AND CONTINUE 


>SET UP PARS 0,1,2.7 


“SET UP FOR TRAP TO 4 
“PARS 3.4.5 WILL TAKE US TO HIGH CORE 


;POINT TO PAR3 
;POINT gis PARO 
; TURN ON MM 


SUSE PARS 3.4.5 TO RESTORE CODE TO LOW CORE 


H IF 


RELOCATE THE PROGRAM 
E WE FINISHED? 
NO 

: TURN OFF MM 


a 4 be TG PAR 3 


:POINT 


TO PAR 


AR 0 


; RESTORE THE PROGRAM 


D 
MA INDE C-11=CEKBG=C PoP=11/70 SYSTEM POWER FAIL -MACY11 30a(4059) 13=MAR~80 16:04 PAGE 56 
CEKBGC .P11 13-MAR-B0 16:06 MEMORY BOX TEST ROUTINES SEQ 0068 
2911 03 022705 060000 CMP #60000, R5 sARE WE FINISHED? 
12 03 2§ 003374 BGT 1$ : 
e913 0 207 RTS PC “RETURN=STILL EXECUTING IN HIGH CORE 
2915 0 052737 001000 177746 ENTR: BIS ABIT9, CONTRL ;TURN OFF CACHE 
2916 0 017705 163570 MOV @ACR, RS :GET CPU ID 
e917 033240 072527 177770 ASH #-10, R5 
18 O 44 004 CLR RG ;SET UP RO 
2919 0 46 026405 014226 65$: CMP SCPUID(R4), RS 
2920 033252 001404 BEQ 64$ 
1 033254 005724 TST (R4)+ 
2988 033256 0 e7 000010 CMP R4 #10 
2923 03 002771 BLT 65$ 
2924 03 64 010400 64$: MOV R4, RO ) 
2925 O3 3566 010001 MOV RO, R1 :SET UP R1 
2926 033270 006201 ASR R1 
2927 033272 052777 100000 163530 BIS #B1T15, @ACR : INITIALIZE THE IIST 
29 0 016006 014200 MOV SSSTP(RO), SP -SET UP THE STACK 
2929 033304 012760 034656 014662 MOV ASPWRDN, PWRTAB(RO):SET UP F 
29 033312 020027 000000 CMP RO, #0 : SHOULD WE BE HERE? 
31 033316 001406 BEQ 1$ “BRANCH IF NO 
2932 033320 005060 017012 CLR NOPRMP (RO) 
2933 033324 104401 045163 TYPE 1111 
293%4 0333 000137 031226 JMP TS24B sRETURN SLAVES 
2935 033334 104025 1$: ERROR 25 : UNEXPECTED INTERRUPT 
2936 033336 000000 HALT T THE MASTER 
2938 
2939 | 
2940 
tad .SBTTL PARITY ERROR HANDLER 
mk 033340 005327 PARERR: DEC (PC) + sFIRST TIME IN? 
2944 033342 000001 PARFLG: .WORD 1 
2945 033344 002001 BGE 1$ :BRANCH IS YES 
2946 033346 000000 HALT “ELSE HALT 
2947 033350 013760 177766 014250 1S: MOV CPUERR, $REG1(RO) ) 
2948 033356 013760 177744 014260 MOV MEMERR, $REG2(RO) 
2949 33364 104007 ERROR 7 sUNEXPECTED TRAP TO 114 
2950 033366 HALT 
2951 033370 013737 177744 177744 MOV @SMEMERR,@AMEMERR :CLEAR ERROR INDICATORS 
2952 033376 012737 000001 033342 MOV #1,.PARFLG : INITIALIZE PARITY ERROR FLAG 
2953 033404 000002 RTI ONTINUE TESTING 
393% .SBTTL SETUP MEMORY MANAGMENT REGISTERS 
2956 033406 012737 000000 172340 MAP: MOV #0, @4K IPARO :SETUP PARO FOR 1ST 4k 
2957 033414 012737 077406 172300 MOV #77406, @#KIPDRO :4K, R/W, EXPAND UP 
2958 033422 012737 000200 172342 MOV #2 IPAR1 :SETUP PARO FOR 2ND 4k 
2959 033430 012737 077406 172302 MOV #77406, @AKIPDR1 :4K,R/W,EXPAND UP 
2960 033436 012737 000400 172344 MOV #400. aAKIPAR2 :SETUP PAR2 FOR NEXT 4k 
2961 033444 012737 077406 172304 MOV #77406, ,a#KIPDR2 :4K,R/W,EXPAND UP 
2962 033452 012737 000000 172352 MOV #0, @AKIPARS SET uP "PARS FOR 1ST 4k 
2963 033460 012737 077406 172312 MOV #776406, aM"KIPDRS : 24K, R/W, 
2964 033466 010737 000200 172354 MOV #200, a#K IPAR6 cet uP PAR6 FOR 2ND 4 
3965 033474 012737 000000 172314 MOV — #0, a4KIPDR6 ‘ABORT ALL REFE RENCES 
2966 033502 012737 177600 172356 MOV #177600, a4K IPAR7 >SET UP PAR7 FOR I/0 PAGE 


g: 


aaa 


é 


Sec5ee 


weseesees 
OOo NOUS WO 


ons 


E 
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P11 SE 


TUP MEMORY MANAGMENT REGISTERS SEQ 0069 
033510 012737 077406 172316 MOV #77406,@AKIPDR7 34K, R/W, D=uP 
033516 012737 20 172516 MOV WBITO4.AAMMR3 =: SET UP fon 22=BIT MAPP 
033524 012737 ooss 000250 MOV #MMERR | aAMMVE C SET MEMORY MANAGEMENT. VECTOR 
033532 000207 RTS PC STURN FROM CALL 
033534 000000 MMERR: HALT :MEMORY MANAGEMENT ERROR 
033536 000776 BR MMERR 
; _SBTTL MASSBUS TRANSFER ROUTINES 
033540 MBUSR: 
033340 032737 000200 176700 4S: BIT WBRIT7, @ARPCS1 :WAIT FOR CONTROLLER READY 
033546 001774 BEO 4$ 
033550 156037 014632 176710 BISB § MBDSW(RO), QARPCS2 :GET THE DRIVE # 
033556 012737 174000 176702 MOV #-4000, a#RPWC -:SET WORD COUNT 
03 24 010437 176704 MOV R4,@4RPBA ::SET MEMORY ADDRESS 
033570 005037 176706 CLR @ARPDA = READ SECTOR 0 
033574 032737 000200 176712 38: BIT #BI1T7, @ARPDS “WAIT FOR DRIVE READY 
033602 001774 BEQ 3$ 
033604 052737 000001 176700 BIS WB1TO,@ARPCS1 .: 
033612 106237 033534 1$: ASRB  MMERR -:DO ASRB DURING TRANSFER 
106237 033534 ASRB  MMERR 
033622 106237 033534 ASRB MMERR 
03, 106237 033534 ASRB MMERR 
033632 106237 033534 MMERR 
03 106237 033534 ASRB  MMERR 
033642 106237 033534 ASRB  MMERR 
106237 033534 ASRB MMERR 
033652 106237 033534 ASRB  MMERR 
033656 106237 033534 ASRB  MMERR 
033662 032737 000200 176712 BIT #BIT7,@#RPDS =:DEVICE READY? 
70 001750 BEQ 1$ 2s H IF NO. 
033672 737 176700 TST @ARPCS1 > [ANY ERRORS? 
033676 1 1 BPL 2$ 33 
000000 HALT > YES 
033702 000207 23: RTS PC > :RETURN 
.SBITL LINE CLOCK ROUTINE 
033704 012737 033724 000100 SETCLK: MOV #5$,a#100 ;3SET THE INTERRUPT VECTOR FOR CLK 
033712 005204 INC R4 -ADD 1 TO THE ARGUMENT PASSED 
033714 012737 000100 177546 MOV #8116, 4LKS > START THE CLOCK 
033722 000207 RTS PC : : RETURN 
033724 052737 000340 177776 SS: BIS #340, a4PS -:HIGH PRIORITY 
732 042737 000200 177546 BIC #BIT?, @ALKS :icL LEAR THE MONITOR BIT 
033740 00 DEC R4 “ONE TICK 
033742 005704 TST R4 : : COUNT TO ZERO? 
033744 001010 BNE 6$ ;:NO DON" T STOP THE CLOCK 
746 005037 177546 CLR a4LKS -°~ 2N IT OFF 
033752 000240 NOP 
33754 000240 NOP 
033756 000240 NOP 
033760 000240 NOP 
033762 062716 000004 ADD #4, (SP) : SKIP RETURN 
033766 162716 000002 6$: SUB #2, (SP) “IF COUNT ISN'T EXPIRED... 
033772 000002 7$: RTI « CRETURN TO THE WAIT 


MA INDE C-11-CEKBG-C 
CEKBGC .P11 


325 
3024 


3 
? 


PDP-11/70 SYSTEM POWER FAIL 
POWER 


13=MAR-80 16:04 


034436 
016740 
000020 
000440 
014200 
177572 
177676 
177776 


172376 
170200 
170376 


014572 
016754 


034256 
000001 


034166 
016754 
016752 


016756 
016752 


016760 
016752 


016762 
016752 


014662 


170016 


014662 
016752 


016754 


016756 


016760 


016762 
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FAIL ROUTINE (SECTION 1 


-SBTTL POWER FAIL ROUTINE (SECTION 1) 


1$: 


10$: 


20$: 


30$: 


3$: 


4$: 


5$: 


6$: 


#ILLUP.PWRTAB :IF TOO FAST WITH POWER UP 
UBEF *:USE UNIBUS EXERCISER? 
#BIT4,@#UBCR2 ;:CLEAR POWER FAIL ENABLE 
#440,SP ;YELLOW OR RED? 
$$STP(RO),SP § :SET EMERGENCY STACK 

=(SP) -SAVE R 

»R2 “SAVE PSw THRU MMRO 
(R2)+,=(SP) 
#UDPAR7 ,R2 
10$ 
W,-(SP) :SAVE PSW 
AYCONTRL.-(SP) =SAVE CACHE CONTROL 
3,- : SAVE MMR3 

#SIPDRO,R2 “SAVE SIPDRO THRU KDPAR7 
(R2)+,-(SP) 

PAR7, 
20$ 
#MAPLOO,R2 : SAVE THE UNIBUS MAP 
(R2)+,- (SP) 
#MAPHS7 ,R2 
RO,~(SP) :SAVE THE GENERAL REGISTERS 
R3,~-(SP) 
R4.~(SP) 
R5.-(SP) 
SP, SAV :SAVE THE STACK 
COUNTO(RO) *CLEAR LOOP COUNTER 
RO, RO : INDEX TO THE RIGHT COUNTER 
RO, RO 
R0,R0 
R1. 
R1. 


RO 
#POWUP, PWRTAB ;ENABLE GOOD POWER-UP 
34 OF LOOPS FOR 2 MS (WORST CASE CONTENTION) 
7START LOOPING UNTIL DC POWER FAILS 


LOOPS , COUNTO :2MS UP? 

3$ sBRANCH IF NO 
:F INISHED 
COUNT 1 

> lahat 


COUNT2 
” siiataheeataie 


COUNT 3 
LOOPS , COUNT 3 





az 
: 


PSPELeSseeBaREREEY S 


vi 


wi 
Nm 
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: 
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%-MAR-80 16:04 POWER FAIL ROUTINE (SECTION 1) SEQ 0071 
‘001372 BNE 6$ 
000000 HALT 
POWUP : | 

012737 034442 014662 MOV #ILLDWN,PWRTAB: SET TOO FAST DOWN VECTOR 
013706 014572 MOV SAV6, SP “RESET 
012605 MOV (SP)+,R5 “RESTORE THE REG STERS 
012604 MOV (SP)+-R4 
012603 MOV (SP)+°R3 
012601 MOV (SP) +>R1 
012600 MOV (SP)+-RO 

2702 170400 MOV #MAPHS7+2_.R :RESTORE UNIBI'’ iAP 

12642 10$: MOV (SP) +,-(R2) 

22702 170200 CMP #MAPLOO .R2 
103774 BLO 10$ 
012702 172400 MOV HKDPAR7+2.R2  : RESTORE K AND S PARS/PDRS 
012642 20$: MOV (SP) +,-(R2) 
022702 172200 CMP #SIPDRO,R2 
103774 BLO 20$ 
012637 172516 MOV (SP)+,aWMMR3 RESTORE MMR3 
012637 177746 MOV (SP)+.@#CONTRL :RESTORE CACHE CONTRL 
012637 177776 MOV (SP) +, a#PSW “RESTORE PSW 
012702 177700 MOV HUDPAR7+2,R2  :RESTORE PSW THRU MMRO 
012642 30$: MOV (SP) +,-(Re) 
022702 177572 CMP #MMRO.R2 
103774 BLO 30$ 
012602 MOV (SP) +,R2 :RESTORE R2 
004737 034446 JSR PC, TIMIT =CHECK THE POWER-DOWN TIME 
012737 033774 014662 MOV #POWDWN,PWRTAB :RESET THE DOWN VECTOR 
105737 016740 TSTB —sUBEF -UBE BEING USED? 
001403 BEQ 2$ “BRANCH IF NO 
012737 000001 017022 * MOV #1 ,UBELCK *CLEAR THE PF LOCK 
105737 016737 STB ss MPF :MULTIPROCESSOR MODE? 
001403 BEQ 1$ “BRANCH IF NO 
052737 001000 177746 BIS #1000, a4CONTRL BYPASS CACHE 
052737 000014 177746 1S: BIS #14,  a#CONTRL = TURN OFF CACHE 
000113 JMP (R3) : JUMP INDIRECT TO R3 
000000 | ILLUP: HALT -POWER UP BEFORE POWER DOWN COMPLETE 
000776 BR 72 “LOCK UP THE HALT 
000000 ILLDWN: HALT :POWERED DOWN BEFORE UP COMPLETE 
000776 | BR 72 “LOCK UP THE HALT 

TIMIT: 

023760 016752 016754 CMP LOOPS , COUNTO(RO) :DID WE HAVE ENOUGH POWER DOWN TIME? 
001402 BEQ 1$ :BRANCH IF YE 
104401 045221 TYPE , $SDOWN :NOT ENOUGH TIME 
000207 1$: RTS PC 


a 
é 


a 8 
wo 


WAY AAAA A AAA ABABA A AAAS AAAS AS AG ASAAA AAAS ASA AA AAA AAS ASA AA 


SSELRAERATALS YSIS ARANVISSSIFEALARLIS SEVSAFUNASSSLERRGA LE SSS 


DOOSS9S9D0000000 
MV 
FRSA 


ooo 
EEESE 


AAAAAA AAA 
NNN 


8 gossssssss? 
™N 
Ww 
™N 


001403 
012737 


012246 


014532 


172340 
077406 


162210 
177770 


014226 


000010 


014662 
035316 
000040 
000001 


017052 
014200 
177572 
177676 
177776 


172376 
170200 
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662 


014 
014612 


014642 


POWER FAIL 


65$: 


64$: 


SPWRDN: MOV 


20$: 


30$: 


H 
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SEQ 0072 


POWER FAIL ROUTINE (SECTION 2) 


HI CORE 
1$ 


KIPARO 

#77406, KIPDRO 
#200,  KIPAR1 
#77406, KIPDRI 


#400, | KIPAR 
#77406 KIPDR2 


:DID WE POWER DOWN IN HIGH CORE? 
sBRANCH IF 
:SET UP PARS 0,1,2,7 


177600, KIPAR7 
#77406, KIPDR7 
#20,  MMR3 
RR, MMVEC 

HIBOX, KIPARO 
HIBOX, KIPAR1 
HIBOX, KIPAR2 
#1, 0 :POWER-UP IN HIGH CORE 
@ACR, R5 :COPY ACR 
#-10, R5 “GET THE ID 
R4 :SET UP R0 
S$CPUID(R4), RS 
64$ 

(RG) + 
R4, #10 
65$ 
R4, RO 
ay: R1 
@PWRTAB (RO) : JUMP TO THE POWER ROUTINE 
#SILLUP, PWRTAB(RO) :SET UVECT FOR ILLEGAL UP 
#SSD..PFFT(RO) = SEND A SIGNAL? 

10$ :NO 
#1, SIGNAL 

YELLIM(RO) , SP : YELLOW OR RED? 
$$STP(RO).SP “SET EMERGENCY STACK 
R2,~(SP) :SAVE R2 

#MMRO,R2 “SAVE PSw THRU MMRO 
(R2)+,-(SP) 

HUDPART ,R2 

100 

aePSw,-(SP) =SAVE PSW 

@FCONTRL,-(SP) :SAVE CACHE CONTRL 
a4MMRS.-(SP) -SAVE MMR3 

#SIPDRO,R2 “SAVE SIPDRO THRU KDPAR7 
(R2)+,~(SP) 

#KDPAR7 ,R2 

20$ 


AMAPLOO ,R2 
(R2)+,-(SP) 


;SAVE THE UNIBUS MAP 


R FAIL ROUTINE (SECTION 2 


p's Sond C PDP-11/70 SYSTEM POWER FAIL 
CEKBGC .P <I S-MAR-B0 16:04 POWE 
3191 034770 022702 170376 CMP 
z108 0 hey 103374 BHIS 
3195 Q 6 4 010046 MOV 
3194 0 $600 010146 MOV 
S108 035002 010346 MOV 
3197 035004 010446 MOV 
3198 035006 010546 MOV 
3199 035010 010660 014572 40$: MOV 
3200 035014 005060 016754 CLR 
1 Q SEA 035142 014662 MOV 
0 208 ADD 
3203 035030 060000 ADD 
3204 035032 060000 ADD 
3205 035034 160100 SUB 
3206 035036 160100 SUB 
$508 035040 012737 000001 016752 MOV 
035046 000160 055052 JMP 
#46 035052 0052357 016754 3$: INC 
3211 035056 023737 016752 016754 CMP 
3516 035064 00137 BNE 
32135 035066 HALT 
3214 035070 005237 016756 4$: INC 
3215 035074 023737 016752 016756 CMP 
3216 035102 001372 BNE 
3217 0351 HALT 
3218 035106 005237 016760 5$: INC 
3219 035112 023737 016752 016760 CMP 
3220 0351 001372 BNE 
3221 035122 HALT 
3222 035124 005237 016762 6$: INC 
3223 035130 023737 016752 016762 CMP 
3224 035136 001372 BNE 
$552 035140 HALT 
3227 035142 012760 035522 014662 S$PWRUP: MOV 
3228 035150 016006 014572 MOV 
3229 035154 012605 MOV 
3230 035156 012604 MOV 
3231 035160 012603 MOV 
$534 035162 012601 MOV 
3233 035164 012600 MOV 
3234 035166 012702 170400 MOV 
3235 035172 012642 10$: MOV 
3236 035174 022702 170200 CMP 
3237 035200 105774 BLO 
3238 035202 012702 172400 MOV 
3239 035206 012642 20$: MOV 
3240 035210 022702 172200 CMP 
3241 035214 103774 BLO 
3242 035216 012637 172516 MOV 
32435 035222 012637 177746 MOV 
3244 035226 012637 177776 MOV 
3245 035232 012702 7700 MOV 
3246 035236 012642 30$: MOV 


> 


MACY11 soa tose) 135-MAR-80 16:04 PAGE 61 | 
SEQ 0073 


WMAPH37 R2 
RO,-(SP) :SAVE THE GENERAL REGISTERS 
R1.-(SP 
R3.-(SP) 
R4, (SP) 
R5.~(SP) 
SP, SAV6(RO) : SAVE THE STACK 
COUNTO(RO) LEAR THE LOOP COUNTER 
#SPWRUP, PuRTAaRO) “GET SET FOR POWER-UP 
RO, RO : NDEX TO THE RIGHT COUNTER 
RO, RO 

“RO 

“RO 
R1,RO 
#1 ,LOOPS # OF LOOPS FOR 2 MS (WORST CASE CONTENTION) 
3$ (RO) : START LOOPING UNTIL DC POWER FAILS 
LOOPS , COUNTO :2MS UP? 
3$ :BRANCH IF NO 

:F INI SHED 

COUNT 1 
LOOPS , COUNT1 
4$ 
COUNT 2 
LOOPS , COUNT2 
5$ 
COUNT3 
LOOPS . COUNTS 


#ILLDN, PWRTAB(RO) :SET VECTOR FOR FAST DOWN © 
6(RO) SP “RESTORE STACK 
R5 -SAVE THE GENERAL REGISTERS 


;RESTORE UNIBUS MAP 


td 


10$ 
#KDPAR7+2 ,R2 
(SP) +,-(R2) 
#SIPDRO,R2 
20$ 


sRESTORE K AND S PARS/PDRS 


(SP)+,@4MMR3 = RESTORE MMR3 
(SP)+.@MCONTRL =:RESTORE CACHE CONTRL 
(SP) +. a#PSw “RESTORE PSW 
HUDPAR7+2,R2 =RESTORE PSwW THRU MMRO 
(SP) +,-(R2) 
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PDP-11/70 SYSTEM POWER FAIL MACY11 
16:04 POWER FAIL ROUTINE (SECTION 2) SEQ 0074 
177572 CMP #MMRO ,R2 
BLO 0$ 
MOV (SP) +, RQ =RESTORE R2 
034446 JSR PC, TIM sCHECK THE POWER DOWN 
000020 014612 BIT #SSU,PFFT(RO) *SEND SIGNALS? 
BEQ 45$ =NO 
000001 014642 MOV #1, SIGNAL 
000001 014712 45$: MOV #1.SYNC.1 THIS MAY UNLOCK THE OTHER CPUS 
034656 014662 MOV #SPWRDN . PWRTAB(RO) :SET VECTOR FOR POWER FAIL 
TST R3 :15 R R3 ZERO? 
BEQ 50$ YES 
MOV R3, (SP) “FUDGE RETURN ADDRESS ON STACK 
50$: RT] 
SILLUP: 
HALT :POWER UP BEFORE POWER DOWN COMPLETE 
BR “HANG UP THE PROCESSOR 
ILLDN 
HALT :POWER DOWN BEFORE UP COMPLETE 
_SBTTL END OF PASS ROUTINE 
FERRARA EREREREAEKEREREREREERERRAEKEREEERRAEEEAERERER ERS 
«INCREMENT THE PASS NUMBER (SPASS) 
:*INDICATE END-OF ~PROGRAM AFTER 1 PASSES THRU THE PROGRAM 
; *TYPE "END PASS AXXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT 
: CPU #1 > BBRBB 
: cpu #2 > CCCCC 
CPU #3 > DDDDD,, 
: TOTAL SYSTEM-WIDE ERRORS YYYYY 
* WHERE XXXXX,AAAAA, BBBBB , cece. DDDDD, “a YYYYY ARE DECIMAL NUMBERS 
:*IF THERES A MONI TOR GO TO IT 
**I]F THERE ISN'T JUMP TO RESTAB 
SEOP: 
016776 ASRB _—sSYNC..3 :: CONTROL ENTRY 
BCC SEOP 
016737 TSTB = MPF ; MP MODE? 
BEQ 4$ “BRANCH IF 
TST RO *:1S THIS THE POMASTER? 
BEQ 4$ * YES 
014134 INC $EOPSG 
000001 016776 MOV #1, SYNC.3 ;:ALLOW ANOTHER CPU IN 
014134 1$: TST SEOPSG HHS THE MASTER FINISHED? 
BNE 1$ CH IF NO 
014200 MOV $$STP(RO),SP § ::RESET THE STACK 
037064 i JMP @RESTAB(RO) 
014134 INC SEOPSG 
000001 016776 MOV #1, SYNC.3  ::ALLOW ANOTHER CPU IN 


} 


MA INDE C-11-CEKBG-C 
CEKBGC .P71 


035502 
035504 


035742 


135-MAR~-80 1 


alg SYSTEM 
6:04 E 


014134 016774 5$: 


014344 
100000 


036122 
035460 


014344 


035512 


016737 


014333 
035574 


036226 
014042 


014333 
03567? 


000001 
036226 
014042 


014333 
035672 


000002 
036226 
014042 


014333 
035732 


014344 


SEOPCT: 


1$: 
SENDCT: 


3:65$: 
64$: 


3678: 
66$: 
3,698: 
68$: 
-71$: 


+08: 


sg 


-75$: 


o4$: 
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SEOPSG, CPUACT 
5$ 


SPASS : INCREMENT THE PASS NUMBER 
2 dallas ::DON*T ALLOW A NEG. NUMBER 
+ se 
: 
1$ : YES 
SDOAGN 
a : ;RESTORE COUNTER 
,65$ Hh tg ASCIZ STRING 
64$ :GET OVER THE ASCIZ 
<12><15>/END PASS #/ 
S$PASS ,~ (SP) 7; SAVE Ary FOR TYPEOUT 
hg ASS R 
::GO TYPE--DECIMAL ASCII WITH SIGN 

,67$ ce PE ASCIZ STRING 

:GET OVER THE ASCIZ 
7 TOTAL ERRORS SINCE LAST REPORT / 
MPF 
UNIEOP 
, SCRLF 
,O9$ :: TYPE ASCIZ STRING 
68$ ::GET OVER THE ASCIZ 
/CPUAO /<76> 


PC ,EOPLID 
SERTTL(R3) ,-(SP) 
- SCRLF 

71$ 


7:SAVE SERTTL(R3) FOR TYPEOUT 
3:GO TYPE--DECIMAL ASCII WITH SIGN 


sz TYPE ASCIZ STRING 
0$ ::GET OVER THE ASCIZ 
/CPUA1 /<76> 


;:SAVE SERTTL(R3) FOR TYPEOUT 
3:GO TYPE--DECIMAL ASCII WITH SIGN 


32 TYPE ASCIZ STRING 
33GET OVER THE ASCIZ 


PC EOPLID 
SERTTL(R3) .-(SP) 
SCRLF 

73$ 


2$ 
/CPUA2 /<76> 


;:SAVE SERTTL(R3) FOR TYPEOUT 
3:G0 TYPE=-DECIMAL ASCII WITH SIGN 


stole ASCIZ STRING 
:GET OVER THE ASCIZ 


PC EOPLID 
SERTTL (R3) .-(SP) 
.SCRLF 

75$ 


4$ 
/CPUA3 /<76> 


SEQ 0075 


L 6 
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CEKBGC.P11 ND OF PASS ROUTINE SEQ 0076 
3359 035742 012703 000003 MOV #3,R3 
30 035746 004737 036226 JSR PC EOPL 
%1 035752 016346 014042 MOV SERTTL IRS), ~(SP) “SAVE SERTTL(R3) FOR TYPEOUT 
366 035756 104405 TYPDS =:G0 TYPE--DECIMAL ASCII WITH SIGN 
0 3760 104401 014333 TYPE  ,$CRLF 
3 035 104401 035772 TYPE 77$ is TYPE ASCIZ STRING 
5 0 25 0 BR 6$ T OVER THE ASCIZ 
3 -:77$: .ASCIZ /TOTAL SYSTEMWIDE ERROR COUNT 
3367 036032 76$: 
3 036032 UNIEOP: 
3 0 32 013746 014224 MOV SERGBL.-(SP) _::SAVE $SERGBL FOR TYPEOUT 
0 104405 TYPDS =:GO TYPE=-DECIMAL ASCII WITH SIGN 
71 036040 104401 014333 TYPE $CRLF 
0 005037 014224 CLR $ERGBL 
036050 012703 014042 MOV #SERTTL,R3 :CLEAR THE 
4 036054 005023 CLR (R3) + “ERROR TOTALS. 
375 036056 005023 CLR (R3)+ 
3376 036060 005023 CLR (R3)+ 
33 036062 005023 CLR (R3)+ 
3378 036064 005013 CLR (R3) 
3379 036066 000400 BR 99$ :SKIP OVER IN SUBROUTINE 
3380 036070 000404 99$: BR $GET 
3381 036072 013702 000042 $GET42: MOV w42,R2 ::GET MONITOR ADDRESS 
3 036076 001411 BEQ SDOAGN : “BRANCH IF NO MONITOR 
3 036100 000001 WAIT 
3384 036102 013702 000042 $GET: MOV ar42,.R2 3; INSURE R2 CONTAINS THE MONITORS 
3385 036106 001405 SDOAGN > >RETURN ADDRESS 
3386 036110 RESET >:CLEAR THE RD 
3387 036112 004712 SENDAD: JSR PC, (R2) =:GO TO MONITOR 
3388 036114 000240 NOP :: SAVE ROOM 
3389 036116 000240 NOP =3 
3 036120 000240 NOP > =ACT11 
3391 036122 013746 014660 SDOAGN: MOV SPSWR, -(SP) 
392 036126 013746 014716 MOV TYPQUE, -(SP) 
3393 036132 013746 014720 MOV TY : -(SP) 
3394 036136 013746 016740 MOV UBEF , (SP 
3395 036142 013746 016774 MOV CPUACT, ~-(SP) 
396 036146 013746 016736 MOV FLAGB, -(SP) 
3397 036152 0 JSR PC, RESTRT 
3398 036156 012637 016736 MOV ; - 
3399 036162 012637 016774 MOV (SP)+, CPUACT 
3400 036166 012637 016740 MOV (SP)+, UBEF 
3401 036172 012637 014720 MOV (SP)+. TYPQUE+2 
02 036176 012637 014716 MOV (SP)+, TYPQUE 
03 036202 012637 014660 MOV (SP)+, SPSWR 
04 036206 005037 014134 CLR SEOPSG =CLEAR THE COUNT AND FREE SLAVES 
05 036212 016006 014200 MOV S$STP(RO) SP RESET THE STACK 
06 036216 000170 037064 JMP AB(RO) RETURN 
3407 036222 377 377 000 $ENULL: .BYTE ns ly : :NULL CHARACTER STRING 
08 036226 EVEN 
3409 036226 EOPLID: 
3410 036226 005002 CLR R2 -RESET FOR COUNT 
3411 0 026203 014226 65$: CMP $CPUID(R2).R3  : SID MATCH? 
3412 036234 001404 BEQ 64$ ; 
3413 036236 005722 TST (R2)+ : INCREMENT R2 BY 2 
3414 036240 020227 000010 CMP R2,#10 
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ND OF PASS ROUTINE SEQ 0077 
036244 002771 BLT 65$ 
036246 010203 64$: MOV R2,R3 sMOV LOGICAL ID TO 2ND OPERAND 
036250 000207 RTS PC 


-SBTTL SCOPE HANDLER ROUTINE 


RISE ICICI ISICISIIOIOIOIDISIOIOIINIIOIIOR IIIS IOISIOIOIUIOIOIUIOIIOINIOISIIDIDIOIDIDIDIIIOIOIOI ITS 
THIS a CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 

:*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
:*THE SWITCH tidy sage 5 BY THIS ROUTINE ARE: 


+ *SW14=1 
> «SWO9=1 LOOP ON ERROR 
> *CALL 
;* SCOPE : ;SCOPE=IOT 
036252 SSCOPE : 
036252 032770 040000 014160 1$: BIT #81714 ,@SWR(RO) ;;LOOP ON PRESENT TEST? 
036260 001056 BNE VER -YES IF SW14=1 
; AMMANSTART OF CODE FOR THE XOR test ERMHAHH 
036262 000416 $XTSTR: BR 6$ : IF RUNNING ON THE XOR’" TESTER CHANGE 
“THIS INSTRUCTION TO A ‘NOP’’ (NOP=240) 
036264 013746 000004 MOV QYERRVEC .-(SP) «SAVE THE CONTENTS OF THE ERROR VECTOR 
036270 012737 036310 000004 MOV #5$,QWERRVEC = 3; SET_FOR TIMEOUT 
036276 005737 177060 TST a#177060 *:TIME OUT ON XOR? 
036302 012637 000004 MOV (SP)+,aMERRVEC °:RESTORE THE ERROR VECTOR 
306 000423 BR SSVLAD «GG TO THE NEXT TEST 
036310 022626 5$: CMP (SP)+, (SP) + *=CLEAR THE STACK AFTER A TIME OUT 
036312 012637 000004 MOV (SP) +, @#ERRVEC ;7RESTORE THE ERROR VECTOR 
036316 000411 BR 7$ LOOP ON THE PRESENT TEST 
0 6$::4HHAMEND OF CODE FOR THE XOR TESTERMAAAH 
105761 014006 2$: TSTB = SERFLG(R1) ; HAS AN ERROR OCCURRED? 
036324 001414 BEQ SSVLAD 
036326 032770 001000 014160 BIT ¥B1T09,aSWR(RO) i LOOP ON ERROR? 
0 001002 BNE 7$ ::BR IF NO 
036336 000160 036352 JMP 4$(RO) 
036342 013760 014032 014022 73: MOV SLPERR, $LPADR(RO) ::SET LOOP ADDRESS TO LAST SCOPE 
036350 000422 BR SOVER 
036352 105061 014006 4$: CLRB  $ERFLG(R1) ::Z7ERO THE ERROR FLAG 
036356 105261 014002 $SVLAD: INCB  $TSTNM(R1) *=COUNT TEST NUMBERS 
036362 005710 TST (RO) *:7S THIS THE MASTER 
036364 001003 BNE 1$ > NO, 
036366 116137 014002 014342 ie MOVB  $TSTNM(R1),$TESTN ::SET TEST NUMBER IN APT MAILBOX 
036374 011660 014022 MOV (SP) ,$LPADR(RO) ::SAVE SCOPE LOOP ADDRESS 
036400 011660 014032 MOV (SP) -$LPERR(RO) ::SAVE ERROR LOOP ADDRESS 
036404 005060 014322 CLR SESCAPE (RO) S;CLEAR THE ESCAPE FROM ERROR ADDRESS 
036410 112737 000001 014060 MOVB  #1,$ERMAX “ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
036416 113771 014002 014170 $OVER: MOVB  $TSTNM,aDISPLAY( (Ri): zDISPLAY TEST NUMBER 
036424 016016 014022 MOV $LPADR(RO) , (SP) :sFUBGE URN ADDRESS 
036430 000002 RTI XES Pe 
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KBGC .P11 1 ~80 16:04 SCOPE HANDLER ROUTINE SEQ 0078 
471 

a0%8 .-SBTTL ERROR HANDLER ROUTINE 

3474 RRR ERA EEA EERE RRA REE EE ERR ERE ee 
3475 SRTHIS ROUTINE WILL INCREMENT THE mae FLAG AND THE ERROR COUNT, 
3476 :*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
3477 ; *MADE BY THE i PROCESSOR 

3478 ;*AND TYPE OUT THE PROCESSOR ID AND PC OF THE ERROR INSTRUCTION 
3479 :*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

3480 > *SW15=1 HALT ON ERROR 

3481 ; *SWO9=1 LOOP ON ERROR 

3482 > *CALL 

3483 7? ERROR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 

3485 036432 SERROR : 

3486 036432 105261 014006 7$: INCB SERFLG(R1) +3SET THE ERROR FLAG 

3487 036436 001775 BEQ 7$ ;DON'T LET THE FLAG GO TO ZERO 
3488 036440 116170 014002 014170 MOVB STSTNM(R1), ap sPLAY (RO) ivi he TEST NUMBER 
3489 036446 005260 014042 INC SERTTL (RO) INC THE ERROR COUNT 
3490 036452 005257 014224 INC SERGBL 

3491 036456 011660 014064 MOV (SP), wh En ;;GET ADDRESS OF ERROR INSTRUCTION 
3492 036462 162760 000002 014064 SUB #2, SERRPC (RO) 

3493 036470 117061 014064 014054 MOVB SSERRPC (ROD SITEMB(R1) ;;STRIP AND SAVE THE ERROR ITEM CODE 
3494 036476 010660 014074 MOV = SP, $ERRSP(RO) =; ;SAVE THE CURRENT STACK POINTER 
3495 036502 005770 014160 TST aSWR (RO) : HALT ON ERROR? 

3496 036506 100025 BPL 10$ :zSKIP IF CONTINUE 

3497 036510 005700 TST RO :21S THIS THE MASTER? 

3498 036512 001022 BNE 3$ sNO 

3499 036514 104401 056522 TYPE 70$ 33 TYPE Saale STRING 

3500 036520 000417 BR 75$ T OVER THE ASCIZ 

3501 036522 005015 040510 052114 /70$: -ASCIZ <15><12>/HALT ON MASTER IN SERROR/<15><12> 
3502 036530 047440 020116 040515 

3503 036536 052125 051105 044440 

3504 036544 020116 042444 051122 

3505 036552 051117 005015 000 

3506 0 ~EVEN 

3507 036560 75$ 

3508 036560 000000 3$: HAL T 

3509 036562 000413 10$: BR 6$ :NO LOOP ON ERROR 

3510 036564 032770 001000 014160 4$: BIT #B1T9 ,aSWR(RO) ‘SLOOP ON ERROR SWITCH SET? 

3511 0-4: 72 001402 BEQ ::BR IF NO 

$218 «6° 6 016016 014032 MOV SLPERR(RO) (SP) ;;FUDGE RETURN ADDRESS 

513 020600 905760 014322 5$: TST  $ESCAPE(ROS =}: CHECK FOR AN ESCAPE ADDRESS 
3514 036604 001402 BEQ 6$ 3;BR IF NONE 

te12 036606 016016 014322 MOV SESCAPE (RO), (SP) ;;FUDGE RETURN ADDRESS FOR ESCAPE 
3517 036612 6$: 

3518 036612 122737 000001 014356 CMPB #APTENV ,SENV ;RUNNING IN APT MODE 

3519 036620 001007 BNE 1 : INO, SKIP APT ERROR REPORT 

3520 036622 116137 014054 036634 MOVB SITEMB(R1),21$ ;;SET ITEM NUMBER AS Sys —— 
3521 036630 004737 037112 JSR PC ,SATY4 >; REPORT FATAL ERROR TO AP 

3522 036634 000 21$: -BYTE 0 

3525 036635 000 BYTE 0Q 

3524 036636 000777 22$: BR 22$ ;:APT ERROR LOOP 

3525 036640 11$: 

3526 036640 022737 036112 000042 CMP ASENDAD , #42 ;;ACT-11 AUTO-ACCEPT? 


. 


C 


vi 
ada 
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036646 001001 

0 000000 HALT 
5 5 12$: 

5 SERRTYP: 
0 32 1 37 017002 64$: ASRB 
0 103375 BCC 
0 010037 017064 MOV 
0 005060 017012 CLR 
0 116105 014054 MOVB 
830900 69705 090010 SUB 
0 063795 017070 ADD 
036710 0115 036716 MOV 
036714 10441 TYPE 
036716 000000 1$: . WORD 
0 104401 014333 TYPE 
0 4 005725 TST 
0 005715 TST 
See 001406 BEQ 
0 011537 036740 MOV 
036736 104401 TYPE 
036740 000000 2$: . WORD 
036742 104401 014333 TYPE 
Oo786 005725 10$: TST 
036750 005715 TST 
036752 1433 BEQ 
036 011505 MOV 
036 5715 15$: TST 
036760 1430 BEQ 
036762 240 NOP 
036764 011537 014524 MOV 
036770 2527 014002 CMP 
036774 001405 BEO 
036776 37 014524 ADD 
0 017746 155516 MOV 
37006 05 BR 
037010 005046 16$: CLR 
037012 137 014524 ADD 
037016 117716 155502 
037022 104402 17$: TYPOC 
037024 000240 
03 104401 037034 TYPE 
0370 000402 
::66$: ASCIZ 

037040 65s: 
037040 000746 
0370462 104401 014333 20$: TYPE 
037046 012737 177777 017064 MOV 
037054 012737 000001 017002 MOV 
037062 2 RT] 
037064 021450 RESTAB: TST1 
037066 021450 TST1 
037070 021450 TST 
037072 021450 TST1 


8 7? 
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12$ 


ERRLCK 
64 
RO, 


TYPLCK 


$1 TEMB(R1) ,R5 
#3 R5 


#10, R5 
#SERRTB.RS 


(R5),1$ 


4-1 


YYY 
#STSTNM 


YYY 
-(SP) 


YYY 
(SP) 


TYPLCK 


#1, ERRLCK 


SEQ 0079 
i ee IF NO 


‘ALLOW THIS CPU TO ENTER TYPE ROUTINE 
::PRINT MESSAGES WITH PROMPTS 
::;GET THE ERROR ITEM CODE 


:;ADD THE ADDR. OF THE ERROR TABLE 
seSET W 0... 
:; TYPE THE ERROR HEADER 


>: INCREMENT RS BY 2 
:;1S THERE A DATA HEADER? 
.s CH IF NO 


; ;BRANCH I 


3; INCREMENT R5 
771S THERE DATA TO BE TYPED? 


7zGET THE DATA TABLE ADDRESS 
; ARE WE AT THE END OF THE DATA TABLE? 
; BRANCH IF YES 


;POINT TO THE LOCATION WITH THE NUMBER 


73TYPE ASCIZ STRING 
3:GET OVER THE ASCIZ 


;ALLOW ENTRY INTO TYPE ROUTINE 


; ;RETURN 
:END OF PASS RETURN 


MA INDE C-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 
CEKBGC .P11 1 ~80 16:04 ERROR 


3599 


eeeeeheses 


Batata as sat 
CONOULSWIN—O 


gs 


~_ 


037074 


000001 
000001 


000001 


037336 
000001 
000100 


000002 
014336 
014352 


0143552 
014354 
000004 


000002 
177776 
046072 


037340 
014356 
014336 
000002 
014336 
037340 


037337 
037336 


037340 
037336 


037340 


014356 
014357 


000004 


014336 
037250 
000004 
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-SBTTL APT COMMUNICATIONS ROUTINE 


SEAR EERE EERE EKERKRAERERRERERRERE RARER EERE 


1$: 


2$: 


12$: 


MOVB 


#7, SFFLG 
#1. SMFLG 


SATYC 
#1 ,SFFLG 
RO,-(SP) 
R1,-(SP) 
SMF LG 


5$ 
#APTENV, SENV 


#APTSPOOL ,SENVM ; 


@4 (SP) ,RO 
aS ds 
SMSGTYPE 


SFFLG 

12$ 

5 ad 
SMSGTYPE 
a4(SP),$SFATAL 
# SP) 


SMF LG 
(SP)+,R1 
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3:TO REPORT FATAL ERROR 
:;TO TYPE A MESSAGE 


3:TO ONLY REPORT FATAL ERROR 


:;PUSH RO ON STACK 
: PUSH R1 ON STACK 


;sSHOULD TYPE A MESSAGE? 


;;1F NOT 
celF 


ee e BR 
Oh o> ie UNDER APT? 
; SHOULD Lat MESSAGES? 


FIND END OF MESSAGE 


;;SUB START OF MES 


SAGE 
at i MESSAGE LNGTH IN WORDS 
;PUT LENGTH IN MAILBOX 
::TELL APT TO TAKE MSG. 


7 PUT MSG ADDR tae LINKAGE 


URN 
7 PUSH 199776 ON STACK 
*:CALL TYPE MACRO 


ADDRESS 


; s SHOULD Sie? FATAL ERROR? 


;21F NOT 


; : RUNNING UNDER APT? 


T ERROR $ 


NOT: BR 
ae eaee MESSAGE ? 


ETURN ADDR. 


; BUMP _R 
: 3 TELL APT TO TAKE ERROR 


937453 


~CEKBG-C 


SS 


—— © 
— 

™ 
minis 
oO 


7 
37 
16 


sab wee ree A tt 
yw 
yA Rovere 
Ww 
™N 
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WN 
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000001 
037637 
000002 
000001 
000006 
000005 
037637 


037640 
000006 


037640 
037635 
000012 


037635 


037635 


APT CSUP= 040 


D 7? 
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PC 


0 
0 
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RET STACK INTO RO 
URN 
: EMESSG. FLAG 
:LOG FLAG 
 TFATAL FLAG 


.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


TARE SPSASEAASSZAESLELALALSALALA AAS EERE RS ER RARE ASE RAR ARSE RRA AREAS SDSS | 


S THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
NUMBER AND TY 


; *OCTAL (ASCII) 


TYPE IT 
ae HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


= 
+ 
+ 
+ 
+ 
+ 
+ 


NUM, - (SP) 


;NUMBER TO BE TYPED 
:ECALL FOR TYPEOUT 
ie FOR NUMBER OF DIGITS TO TYPE 


331=TYPE LEADING ZEROS 
;;0=SUPPRESS LEADING ZEROS 


i *$TYPON--—-ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 


Ps 
Ps 
** 


° 


s SS TYPOS OR $ 
*CALL: 


MOV 


TYPON 


NUM, ~ (SP) 


;NUMBER TO BE TYPED 
SECALL FOR TYPEOUT 


j$TYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


$TYPOC: 
STYPON: 


MOV 
TYPOC 


NUM, =~ (SP) 


a@(SP) ,-(SP) 
GP) > SOF ILL 
+, SOMOD 


; NUMBER TO BE TYPED 
7 CALL FOR TYPEOUT 


3zPICKUP THE MODE 
; s LOAD gee FILL SWITCH 
R OF DIGITS TO TYPE 
: s ADJUST RETURN ADDRESS 
:SET THE ZERO FILL SWITCH 
:3SET FOR SIX(6) DIGITS 
ET THE ITERATION COUNT 
2: E R3 
7 SAVE R4 
7: SAVE R5 
-:GET THE NUMBER OF DIGITS TO TYPE 
al IT FOR MAX. ALLOWED 
tts IT E 


FOR US 
:GET THE ZERO FILL SwWiTCH 
::PICKUP THE INPUT NUMBER 


SEQ 0081 


MA INDEC-11-CEKBG~C 
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037636 
177770 
037640 
037640 
000060 


006040 
037546 


000002 
037546 
047266 
037634 


037640 


000002 


“tien 
111266 


037546 


000004 
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CLR R3 ::CLEAR THE OUTPUT WORD 
1$: ROL R5 ; ;ROTATE MSB INTO *'C’' | 
BR 3$ :GO DO MSB | 
2$: ROL RS *:FORM THIS DIGIT | 
ROL R5 
ROL R5 
MOV R5,R3 
3$: ROL R3 :GET LSB OF THIS DIGIT 
DECB  $OMODE TYPE THIS DIGIT? 
BPL 7$ F NO 
BIC #177770,R3 : GET RID OF JUNK 
BNE . >: TEST FOR 
TST DIGITS : : SUPPRESS THIS 0? 
BEQ 5$ ;7BR IF YES 
4$: INC DIGITS -DON'T SUPPRESS ANYMORE 0'S 
BIS #'O,R3 ; MAKE THIS DIGIT ASCII 
5$: BIS #' ,R3 “MAKE ASCII IF NOT ALREADY 
MOV 9$, R4 ::POINT TO ERRBUF TABLE 
MOVB = R33, (R4)+  3;PUT THE CHARACTER IN THE TABLE 
CLRB (R4) -MAKE IT A MINI-ASCII MSG 
TYPE | *:GO TO $TYPE 
9S: ERRBUF ;7HERE IS THE LOCATION OF MSG 
ADD #2, 9$ “MOVE TO NEXT TABLE LOC 
CHP 38. #END :gAT THE E END of ALLOWED BUF AREA? 
MOV #ERRBUF ,9$ ELSE POINT TO BEGINNING AGAIN 
7$: DECB $OCNT 7: COUNT BY 1 
BGT 2$ -:BR IF MORE TO DO 
BLT 4S ::BR IF DONE 
INC DIGITS 77 INSURE LAST DIGIT ISN'T A BLANK 
BR GO DO THE LAST DIGIT 
6S: MOV (SP)+,R5 * =RESTORE R5 
MOV (SP)+,R4 : sRESTORE R4 
MOV (SP)+,R3 = -RESTORE R3 
MOV 2(SP),4(SP) *=SET THE STACK FOR RETURNING 
MOV (SP)+, (SP) 
RTI : 7RETURN 
8$: .BYTE 0 =: STORAGE FOR ASCII DIGIT 
.BYTE 0 >: TERMINATOR FOR TYPE ROUTINE 
SOCNT: .BYTE 0 =:OCTAL DIGIT COUNTER 
S$OFILL: .BYTE 0 >:ZERO FILL SWITCH 
SOMODE: .WORD 0 > NUMBER OF DIGITS TO TYPE 
DIGITS: .WORD 0 


.SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


SERRE RRR REE ERA EER EE 
“STHIS ROUTINE IS USED 0 CHANGE A yay BINARY NUMBER TO A 5-DIGIT 

; *SIGNED DECIMAL (ASCII) R TYPE IT. DEPENDING ON WHETHER THE 
**NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
:*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 

= *REPLACED WITH SPACES. 


> *CALL 





Ae nee 
cE P11 


KBGC .P 


13-MAR-80 1 


020200 
000020 


000055 
040062 
000040 


040052 


177777 


040062 
000002 


000001 


177777 


177776 


000004 


*® 
e 
‘* 
’ 


STYPDS: 


7$: 


8$: 


9$: 


$DTBL: 


PDP=11/70 SYSTEM POWER FAIL 
6:04 C 


MOV 
TYPDS 


10000. 


7 
MACY11 30a(1052) 
ONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


NUM , ~ (SP) 


RO,-(SP) 
R1,-(SP) 
R2. ~(SP) 

Rae Bf 4 
#26200. (SP) 
O(SP) _R5 

$3 
R5 
#*=,1(SP) 


ASDBLK ,R3 
#' ,(RS)+ 


R 
SDTBL (RO) ,R1 
R5 


6$ 
1(SP) ,-1(R3) 
#'0, 


R2 


8$ 
RS ,R2 
6$ 
(SP) + 


(SP)+, “RI 
(SP)+,RO 


_$SDBLK 


2(SP) ,4(SP) 
(SP)+, (SP) 


135-MAR~80 16:04 PAGE 71 


;7PUT_THE BINARY NUMBER ON THE STACK 
;:GO TO THE ROUTINE 


| 
;;PUSH RO ON STACK | 
;;PUSH R1 ON STACK 


; «PUSH ON STACK 
7 PUSH R5 ON STACK 
ae BLANK SWITCH — SIGN 


INPUT 


;;SETUP NTER 
23ST THE FIRST CHARACTER TO A BLANK 
; NUMBER 
ONS TANT 
; 3 FORM THIS BCD DIGIT 
7: INCREASE THE BCD DIGIT BY 1 


;zADD BACK THE CONSTANT 
ss CHECK IF BCD DIGIT=0 
THROUGH IF 


L 0 
:# STILL a LEADING 0°S? 


:8R IF NO 
S IYES=-SET THE SIGN 
: sMAKE THE ae DIGIT ASCII 
IT ACE IF NOT ALREADY A DIGIT 
; sPUT TLS CHARACTER IN THE OUTPUT BUFFER 


oJ 
+ = CHE 


3:GO CHANGE TO ASCII 
z2WAS THE LSD THE FIRST NON-ZERO? 
33 VES~~SeT THE hl TYPING 


“POP STACK INTO RO 
3:NOW TYPE THE NUMBER 
;zADJUST THE STACK 

; RETURN TO USER 


MA INDE C-11-CEKBG=C 
CEKBGC P17 


040054 ales 
040056 00014 


3807 


es 


genewenenas 
DWONAULSWR—-O 


040060 
040062 


13-MAR-80 


900012 
000004 


132737 
001403 


106237 
103375 
013703 
005723 
010413 
010337 


013703 
005723 


016615 
010337 


PpP=11/70 SYSTEM POWER FAIL 
16:04 


000040 
000002 


017002 
017064 


016737 
000400 


156654 
177770 
017012 


000001 
017024 


014720 


014720 
014720 
000010 
014720 


000001 


014357 


017012 


017024 


SDBLK: 


. SBTTL 
STYPE: 


6$: 


3$: 


2$: 


64$: 


4$: 


65$: 


5$: 


MACY11 30A 
ONVERT BINARY TO DECIMAL AND 


TYPE SERVICE 


G 
(7 


7 
052) 
TY 


;BRANCH IF 


135-MAR-80 16:04 PAGE 72 


YPE ROUTINE 


i PRINT OUT? 
;SET RETURN 


71S A CPU a THE ERROR ROUTINE? 
BRANCH IF 

:1S THIS CPU. FROM THE ERROR ROUTINE? 
;BRANCH IF NO 

; STORE REGISTERS USED IN THIS PROGRAM 


;DONT TYPE A CPUID 


;PUT SELF ID INTO R5 


;PuT ID re R4 
eer’ THE PROMPT FLAG 
T ‘IT INTO THE LEFT HAL F 
T IT IN R5 


(R ) 
CENTER TYPQUE CRITICAL SECTION 


sCOPY REAR INDEX 
; INCREMENT BY 2 


aad THE ELEMENT 


;UPDATE THE REAR INDEX 


;COPY REAR INDEX 
: INCREMENT BY 2 
[QUEUE THE ELEMENT 
[UPDATE THE REAR INDEX 


;GET PC OF MSG 
=CLEAR CRITICAL he 
Z1S on ha THE MASTER? 


:BRANCH IF YES. 
RESTORE THE REGISTERS 


BITB #40, SENVM 
BEQ 6$ 
ADD #2, (SP) 
RTI 
TST ERRLCK 
BNE 3$ 
CMP RO, TYPLCK 
BNE STYPE 
MOV Re, ~- (SP) 
MOV R3, - (SP) 
MOV R4, - (SP) 
MOV RS, -(SP) 
TSTB MPF 
BNE 1$ 
MOV #400, R4 
BR 2$ 
MOV aACR, R5 
ASH #-10, RS 
MOV RS. R4 
MOV NOPRMP (RO) ,R2 
SWAB R2 
BIS R2,R4 
MOV ° 
ASRB L 
SERRE ENQUE *xxananne 
ov TYPQUE +2 ,R5 
MOV —-RGLCR3D 
MOV 3° TYPQUE 
SS RRRRERARR ARERR EERE EER 
-kkkwaeeee FENOUE teexaenne 
ino TYPQUE +2 R35 
TST (R3)+ 
MOV 10(SP) , (R35) 
MOV R3, TYPQUE+2 
SRERKRERR ERR REE ED eR 
hoy te -(R3) 
MOV TOL4 
TST RO 
BEQ 1$ 
MOV (SP)+, RS 
MOV (SP)+, RS 
MOV (SP)+, R3 


a 


H 7 
MA INDE C-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL MACY11 30A(1052) 13-MAR-80 16:04 PAGE 73 
CEKBGC .P11 13-MAR~80 16:04 TYPE SERVICE SEC 0085 


3863 040262 012602 MOV (SP)+, R2 
3864 0402 062716 000002 ADD #2, (SP) 
3865 040 000002 RT] RETURN 
3508 04027 10$: | | 
3867 040272 1 37 017024 11$: ASRB TOL? sENTER CRITICAL SECTOR 
3868 040276 1033575 BCC 11$ | 
3869 040 HERE : 
3870 seaanee DEQUE terenanane | 
3871 040300 023737 014716 014720 : imp TYPQUE , TYPQUE +2 es THE INDICIES oon? 
7078 040306 001456 BEQ 13$ YES, THE _QUEUE IS EMP 
38 040310 013703 014716 MOV ene R3 og — INDEX INTO R3 
74 040314 005723 TST (R3)+ HINC. R3°BY T | 
75 060316 011304 MOV (R3) ,R4 » :DEQUEUE’ AN ELEMENT 
3876 040320 010337 014716 MOV R3, TYPQUE :;UPDATE FRONT INDEX | 
3877 RRA RAER EERE ERE RR 
3878 040324 032704 000400 BIT #BITB,RS :WAS THE NOPRMP(RO) BIT SET? 
3879 040330 001025 BNE —s-«*128 
040332 062704 021060 ADD #’'O"" RG sMAKE CPUID A CHARACTER 
3881 040336 112702 000015 MOVB #CR,R2 : TYPE # CARRAGE RETURN 
3882 040342 004737 040504 JSR PC, TYPIT TYPE CRLF 
3883 040346 112702 000012 MOVB ALF ,R2 
3884 040352 004737 040504 JSR PC, TYPIT > TYPE IT 
3885 040356 110402 MOVB R4,R2 :CPU ID 
3886 040360 004737 040504 JSR PC,TYPIT 
3887 040364 112702 021076 MOVB #’'>"" R2 See a 
3888 040370 004737 040504 JSR PC,TYPIT TYPE IT 
3889 040374 112702 021040 MOVB ees 
3890 040400 JSR PC,TYPIT ; TYPE A SPACE 
3891 040404 12$: 
3892 sy eeewee DEQUE treeannane 
3893 040404 023737 014716 014720 CMP TYPQUE , TYPQUE+2 ;;ARE THE INDICIES cae? 
3894 040412 001414 BEQ 13$ - = YES, THE QUEUE IS EMP 
3895 040414 013703 014716 MOV TYPQUE .R35 ;COPY FRONT INDEX INTO R35 
3896 040420 005723 TST (R3)+ -INC. R3°BY TWO 
3897 040422 011304 MOV (R3) ,R4 » :DEQUEUE’ AN ELEMENT 
3898 040424 010337 014716 MOV R3,T TYPQUE : ;UPDATE FRONT INDEX 
3899 SRNR AEREREE REE ER 
3900 040430 112402 14$: hove (R4)+,R2 ;GET A CHARECTER 
3901 040432 005702 TST R2 
040434 001721 BEQ HERE sWE"RE DONE .R2 IS CLEAR 
3903 040436 004737 040504 JSR PC, TYPIT sTYPE THE CHARECTER 
3904 040442 000772 BR 14 > LOOP 
3905 040444 012737 014722 014716 13$: MOV ATYPQUE+4, TYPQUE 
3906 040452 012737 014722 014720 MOV ATYPQUE+4, TYPQUE +2 
3907 040460 012737 000001 017024 MOV #1, TQL1 RETURN 
3908 040466 012605 MOV (SP)+, R5 sRESTORE THE REGISTERS 
3909 040470 012604 MOV (SP)+, R4 
3910 040472 012603 MOV (SP)+, R3 
11 060474 012602 MOV (SP)+, R2 
3912 040476 062716 000002 ADD #2, (SP) 
Hag, 040502 000002 RTI 
3915 040504 105777 153504 TYP]T: TSTB a$TPS sWAIT UNTIL PRINTER IS READY 
3916 040510 100375 BPL TYPIT 
3917 040512 110277 153500 MOVB R2,a$TPB ; TYPE THE CHARACTER 


3918 040516 000207 RTS PC ;RETURN 


MA INDE C-1 1-CEKBG~C 
CEKBGC .P11 


13=MAR~80 


011646 


000170 


PDP-11/70 SYSTEM POWER FAIL 
16:04 TYPE SERVICE 


014552 


014562 
014552 
014562 


014672 
177777 
014602 
154036 
014702 


177766 014250 


000002 


014602 


. SBITL 


STRAP: 
1$: 


Ss. 
MACY11 30A(1052) 


TRAP DECODER 


WUTTTITILILILILLIELIL LILLE LLILL Li 
“ STHIS ROUTINE WILL a THE LOWER BYTE OF - oal"et INSTRUCTION 
:*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR T 
:*OF THE DESIRED ROUT INE. THEN USING THE ADDRESS OBTAINED IT WILL 
=*GO TO THAT ROUTINE. 


Re, SAVRG(RO) 


MOV 
MO 


(SP) ,R2 
R2) 


oe? R2 


STRPAD(R2) R2 
ROUTE ( 


SAURG G(RO), 
@ROUTE (RO) 


13-MAR~-80 


3zTHIS IS USE TO HANDLE THE ‘'GETPRI** MACRO 


16:04 PAGE 74 


SEQ 0086 


HE STARTING ADDRESS 


3;GET TRAP »- deme 


ee UP BY 

;;GET RIGHT BYTE OF TRAP 

;zPOSITION FOR INDEXING 
ua TO TABLE 


TTY TYPEQUT ROUTINE 
TYPE OCTAL NUMBER (WITH ot gy My 


PE 
TYPE DECIMAL NUMBER (WITH SIGN) 


DISPATCHER 


$TRAP2: MOV (SP) ,-(SP) :=MOVE THE PC DOWN 
MOV 4(SP) ,2(SP) =>MOVE THE PSW DOWN 
RTI > =RESTORE THE PSw 
_SBTTL TRAP TABLE 
;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
**BY THE "'TRAP’’ INSTRUCTION. 
; ROUT INE 
$TRPAD: .WORD 2 
$TYPE ::CALL=TYPE TRAP+1(104401)- 
S$TYPOC ::CALL=TYPOC TRAP+2(104402) 
$TYPOS ::CALL=TYPOS | TRAP+3(104403) 
STYPON ::CALL=TYPON  TRAP+4(104404) 
S$TYPDS ::CALL=TYPDS | TRAP+5(104405) 
ISTDIS: JMP @ISTTAB(RO) :IIST INTERRUPT 
PWRDIS: MOV #-1. FLAG :FIRST INSTRUCTION FLAG 
CLR FLAG : CLEAR IT 
JMP @PWRTAB 
ERRDIS: JMP BERRTAB(RO) =CPU ERROR DISPATCHER 
CPUER: 
V @ACPUERR, $REG1 (RO) :CPU ERROR REG. 
ERROR 5 





MAINDEC-11-CE C PDP-11/70 SYSTEM POWER FAIL 
CEKBGC .P11 <TS-MAR-80 16:04 TRAP TABLE 


040640 
040642 


SSeeFEas 


Ss st a a Ss es 
ANRASASSNVERS 


VERVANISS 


™S 


RRRRRRRRRRRREKRRRREKRRRRREKRREKKEKK 
SUF 


me me ee me ce me ee ee me ee me ee ee ee ee ee ed ed ed ed od od od) od 2.) = = 


MPM NNN NNN 


™ 
oO 


0 
042510 


042503 
020103 
0 7 
043040 
053523 


041113 
030440 
050040 
044501 


052111 
043505 
020122 


052515 
047522 


052105 


044516 
051505 


052116 
052120 
050040 
040440 


052040 
051505 


™1: 


TM2: 


™M4: 


™5: 


TM6: 


T™™7: 


™10: 


™11: 
TM12: 


™13: 


HALT 
RTI 
L 


.SBTT 
eASCIZ 
-ASCIZ 


ASCIZ 


eASCIZ 


ASCIZ 


eASCIZ 


eASCIZ 


-ASCIZ 
-ASCIZ 


ASCII 


i. ¢ 
MACY11 30A(1052) 13-MAR-80 16:04 PAGE 75 


;RETURN 
DATA AREA 
<CR><LF>\CEKBG-C 11/70 POw FAIL\ 


<CR><LF>\SWITCH REGISTER = \ 


<CR><LF>/CUNIBUS EXERCISER WILL BE USEDJ/ 


<CR><LF>/CUNIBUS EXERCISER WILL NOT BE USEDJ/ 


<CR><LF>/CMULTIPROCESSOR MODE IS IN EFFECTJ/ 


<CR><LF>/CUNIPROCESSOR MODE IS IN EFFECTIJ/ 


/ COTHER CPUS ARE RUNNING. J/ 


<CR><LF><O7>/CPU &#/ 
/ SPECIFIED BUT NOT ACTIVE/ 


<CR><LF>/INTERRUPT THE POWER AFTER THE TEST NUMBER APPEARS/ 





MAINDEC=11 

CEKBGC .P11 
4031 041304 
4032 041312 
4035 041 
4034 041324 
4035 0413 
4036 041340 
4037 041 
4038 041354 
4039 041 
4040 0413 
4041 041376 
rer 041404 
40435 041412 
4044 041420 
4045 041424 
4046 0414 
4047 041440 
4048 041446 
4049 041454 
4050 041462 
4051 041470 
4052 041476 
4053 041504 
4054 041512 
4055 041520 
4056 ool eer 
4057 0415 
4058 041542 
4059 041550 
4060 041556 
4061 041564 
4 041572 
4063 041600 
4064 041605 
4065 041612 
4066 041620 
4067 pe ioe? 
4068 041 
4069 041635 
4070 041642 
4071 041650 
rhs 041656 
40735 041664 
4074 041665 
4075 041672 
4076 041700 
4077 041706 
4078 041713 
4079 041720 
4080 041724 
4081 041 
4082 041740 
40835 041746 
4084 041750 
4085 041756 
4086 041764 


040515 
020125 


052516 
0 


000040 
047520 
040506 
052520 


047012 
051523 
042504 


041115 
050120 


042527 
046111 
021440 


020117 
052502 
044526 


PDP-11/70 SYSTEM POWER 
6:04 DATA AR 


“ETS MAR-B0 1 


™14: 


™15: 


™/76: 


™77: 
™100: 


™101: 


FAIL 
EA 


ASCII 


ASCII 


ASCII 


ASCIZ 


. 
MACY11 30A(1052) 13-MAR-80 16:04 PAGE 76 


/ IN THE DISPLAY./<CR><LF> 


/IF YOU HAVE AN RD CONSOLE, INTERRUPT THE POWER/ 


<CR><LF>/AT THE END OF THIS MESSAGE. THEREAFTER, INTERRUPT THE POWER 15( 


<CR><LF>/TO REACH THE END OF SECTION 1./<CR><LF> 


-ASCI1Z<CR><LF><LF>/ENTERING SECTION 1/<CR><LF> 


-ASCIZ<CR><LF><LF>/ENTERING SECTION 2/<CR><LF> 


ASCIZ<12><15>/THE MASTER IS CPU &/ 


eASCIZ<12><12><15>/TEST / 
-ASCIZ <CR><LF>/POWER FAIL CPU @ / 


-ASCIZ <CR><LF><LF>/NO MASSBUS DEVICE AVAILABLE ON CPU @ / 


MAINDEC=11 
CEKBGC. 


— 2) —) —) Ly os) -— — 3) 8 
— —) 3 od = =) J) 3 
WONAULSWN—O 


ss 
aba 
UNIS 


P11 


R 
a 
g 
Nm 
2 


RGSRESNSSS 
“mS 


eeeee ere dee teres 
VEKSNADVA 
28 
Tra 


MMMM 


ed eed ed ed ed od 


RERRRKK 
aS 


042450 


= 


S gee 
—> 
; 


g 


© 
MOO= 
= 
Noe 
SMRUMONNOMWW 


Or 
ons 


3 
020122 


™102: 


™103: 


™104: 


~CEKBG-C PDP-11/70 SYSTEM POWER FAIL 
XT S-MAR-80 16:04 DATA AREA 


eASCIZ 


eASCIZ 


ASCII 


S| 
MACY11 30A(1052) 13-MAR-80 16:04 PAGE 77 


<CR><LF>/PROCEEDING TO NEXT CPU/ 


<CR><LF>/POWER FAII.URE ON CPU AS EXPECTED/ 


<CR><LF>/GET SET TO POWER FAIL ENTIRE SYSTEM.../ 


-ASCI1<12><12><15>/PUT BATTERY BACKUP ON ALL MEM BOXES/ 


-ASCI1<12><15>/MAKE ALL MEMORY PORTS ONLINE/ 


-ASCI1<12><15>/MAKE ALL CPU POWER-UP SWITCHES ‘RUN OR HALT’’/ 


-ASCI1<12><12><15>/THEN POWER FAIL THE ENTIRE SYSTEM/ 


-ASCII<12><12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 


SEQ 0089 


MAINDEC-11-CE 
CEKBGC .P11 


ws 


304 
5 


RERERERERER 
PENTEL SRE 


RRRRR 
RRS 


C 


13-MAR-80 


042527 
046111 
12 


; 


ASSARFER 
BGSZSESE 
UEDA oo 


020117 


PDP-11/70 SYSTEM POWER FAIL 
16:04 DATA AREA 


040506 


051501 


™106: 


™107: 


mM 7 
MACY11 30A(1052) 13-MAR-80 16:04 PAGE 78 


~ASC1Z<12><15>/EACH CPU SHOULD REPORT A POWER FAIL/ 


-ASCIZ <CR><LF><LF>/GET SET TO POWER FAIL MEM BOX @ / 


-ASCII<12><12><15> /PUT BATTERY BACKUP ON ALL MEMORY BOXES/ 


-ASCI1<12><15>/MAKE ALL MEMORY PORTS ONLINE/ 


-ASCII<12><15>/MAKE ALL CPU POWER-UP SWITCHES “RUN OR HALT’’/ 


-ASCII1<12><12><15>/THEN POWER FAIL THE MEM BOX/ 


-ASCII<12><12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 


-ASCI1<12><15>/THEN TYPE ANY CHARACTER AT THE MASTER CONSOLE/ 


SEQ 0090 


Ceeee alt than PDP-11/70 SYSTEM POWER FAIL 
CEKBGC .P 1 ~80 16:04 DATA AREA 





11 6 
4199 043142 042524 02012 
4200 043150 051516 04611 
4201 043195 O12 0424] 
4202 045162 020110 090105 
4203 043170 044123 052517 
4204 043176 051040 050105 
4205 043204 020124 020101 
4206 043212 042327 020122 
4207 046111 0511 

4208 043226 005012 050013 
4209 04 1040 052101 
4210 043242 054522 041040 
4211 043250 052513 020120 
2512 043956 040440 046114 
4213 043264 046505 051117 
4214 063272 047502 042530 
4215 04 O12 046415 
4216 043304 020105 046101 
4217 043312 042515 047515 
4218 0453320 050040 051117 
4219 043326 047440 043106 
4220 045534 42516 047440 
4221 043342 042515 020115 
4222 043330 020150 047524 
4223 043356 020105 047520 
4224 043364 026522 040506 
4225 043372 042105 

4226 043374 006412 040515 
4227 043402 040440 046114 
4228 043410 052520 05004 
4229 043416 051105 052455 
4230 045424 055523 032111 
4231 043432 051505 02104 
4232 043440 020116 051117 
4233 043446 046101 021124 
4234 043492 005012 052015 
4235 043460 020116 047520 
4236 043466 020122 040506 
4237 043474 052040 042510 
4238 043502 046505 041040 
4239 045310 003012 051013 
4240 043516 047524 042522 
4261 043524 053517 051105 
424¢ 045532 051440 041509 
4243 043540 051504 040440 
4244 043546 051105 050040 
4245 043994 051105 045040 
549 023568 012 051015 
4248 043570 047524 042522 
4249 043576 046114 046440 
4250 043604 051117 020131 
4251 043612 052122 020123 
4252 043620 044514 04291 
4253 043624 006412 044124 
4254 043632 052040 050131 


047503 
105 


047105 
020105 


™108: 


N 7 
MACY11 30A(1052) 15-MAR=-80 16:04 PAGE 79 


-ASCIZ<12><15>/EACH CPU SHOULD REPORT A POWER FAILURE/ 


-ASCI1<12><12><15>/PUT BATTERY BACKUP ON ALL MEMORY BOXES/ 


-ASCI1<12><15>/MAKE ALL MEMORY PORTS OFFLINE ON MEM BOX TO BE POWER-FAILED/ 


-ASCII<12><15>/MAKE ALL CPU POWER-UP SWITCHES ‘RUN OR HALT’’/ 


-ASCI1<12><12><15>/THEN POWER FAIL THE MEM BOX/ 


eASCII<12><12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 


-ASCII<12><15>/RESTORE ALL MEMORY PORTS ONLINE/ 


-ASCI1<12><15>/THEN TYPE ANY CHARACTER AT THE MASTER CONSOLE/ 


SEQ 0091 


SEQ 0092 


8 
MACY11 30a(4059) 13-MAR-80 16:04 PAGE 80 


C 
0471 
0811 
1e6 


j 


Ww 





MAINDEC-11-CE 
CEKBGC .P11 


soastetissit 


DRIVE # / 


-ASC1Z<12><15>/NO CPU SHOULD REPORT A POWER FAILURE/ 


2 ~ 
~ 
E ® 
a 
~ w 
A 
& 8 
Vv ~s 
A 
Va) A 
- w 
Vv = 
A Vv 
™N A 
- ™N 
Vv - 
Vv 
La nN 
tas 4 
: g ¥ 
x “ere, 
x & se se 
es : : 
va 
"te 
& Skgomerneen- sue g 
R Steere Seeeks -EK = 
o s8883 8358S SSE & 
~ 
H. RESGNT ERE RReveNS 
rt — seseasses 
© 83s 3338S Sa7y8s 


nsene 


<x Soren 


35 sesessdde seassenaas 3 


BSN SEctne auRCes NRA UR: 
SESS SE EEEREREERE TET ET epee EEEEE EE 
CAENESR RR Bat GRERRRS NEES 


ee ee es ee eee 9 


ASCI1<12><12><15>/DISABLE BATTERY BACKUP ON MEM BOX TO BE POWER-FAILED/ 


-ASCIZ<12><15>/THE DRIVE WILL BE USED LATER IN THIS DIAGNOSTIC/ 
eASCIZ <12><12><15>/0NLY ONE MEMORY BOX ONLINE- SKIPPING THIS TEST/ 


ASCII <12><15>/I1S PROGRAMMABLE OVFR BOTH A AND B PORTS/ 


-ASCIZ <12><15>/NO MASSBUS DEVICES ON CPU # / 


“) > oO S 

us © = 

- _ 

: Po E 

bh be 
PISSISSNORANAGEN EALNG SSNGSRAS TENS 
YN - OP SE KNEE NNO SONS FS Sewn He KN MOMMTC 
BEG-88 TORSSOSA RATSN SRRESRIS HAAS 
FEBSSLENENEGEENLBONSNR SE AEENSS SENET 
SSSSSSSSSSSSSSSSS SSSSS SSSSSSSS SSSSSS 
Spent s SS SRS SEEGERS SERS Se RAGEESSS 

eH NNNOMen Nw ASW PnsaseaT 

SS90SSS SSSS s8S8 BESEASNS 


~ as 


ghergaanansseas 


wwe 


—bobeb bebebebe 


PEHKHKHKLHLHLHRHK HLH HK PE 
VMFSWN—OO@NOAMUS who 


SELEEASEES 


SS SS BY EI 
WA RANABON 


PEPPREPERERE 
oe 


NESE 


FEEFER 


5: 


md ed eed 
Noon 


peenegersrere 


FEE 
ee 


egEPPRRETE 
SSNFSIR WAIN 


Oo 


Ww 
a 
— 
3 =P) 


PRGREGSRRG 
N= OoNO-ONGY 
NNN aa DN 
PROSE OLSEN 


2 
Ras 
— 2 
=NIN 


© 
Ww 
2 
— 
—~— eB ED 
VIiVTr ANOAS 


470 SYSTEM POWER FAIL 
DATA AREA 


042502 
051105 
042514 


052125 


052123 
046101 


052522 


Cc 8 
MACY1: 30A(1052) 13-MAR-80 16:04 PAGE 81 


eASCIi<12><15>/PUT ALL SLAVE CPU MEM PORTS ONLINE/ 


-ASCI1<12><15>/MAKE MASTER CPU MEM PORT OFFLINE ON BOX TO BE POWER-FAILED/ 


ad 


-ASCI1<12><15>/MAKE ALL CPU POWER-UP SWITCHES ‘RUN OR BOOT’’/ 


-ASCII<12><12><15>/THEN POWER FAIL THE “EM BOX/ 


-ASCII<12><12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 


_ 


-ASCI1<12><15>/RESTORE ALL MEM PORTS ONL INE /— 


_ASCI1<12><15>/RESTORE ALL CPU POWER-UP SWITCHES TO “RUN OR HALT’’/ 


SEQ 0093 


D 
el at den PDP=-11/70 SYSTEM POWER FAIL MACY171 309059) 13-MAR-80 16:04 PAGE 82 
cE 1 -80 16: DATA AREA | 


KBGC.P11 16:06 SEQ 0094 
4367 045016 020116 051117 044040 
4368 045024 046101 021124 
4369 0450 12 044124 047105 ASCI1<12><15>/THEN TYPE ANY CHARACTER AT THE MASTER CONSOLE/ 
4370 0450 050131 020105 
4371 045044 047101 020131 044103 
437¢ 045052 051101 041501 042524 
4 5060 020122 052101 052040 
4374 042510 046440. 051501 
4375 4 042524 020122 047503 
4376 045102 051516 046117 (105 
4377 0451 012 042415 041501 ASC1Z<12><15>/EACH SLAVE CPU SHOULD REPORT AN INTERRUPT/ 
i 5114 020110 046123 053101 
4379 045122 020105 050103 020125 
4380 0451 123 052517 042114 
4381 136 051040 050105 051117 
4382 045144 020124 047101 44440 
438 152 052116 051105 052522 
4384 045160 052120 000 
4385 1 041415 052520 M111: .ASCIZ<12><15>/CPU INTERRUPTED AS EXPECTED/ 
4386 0451 052116 051105 
176 052522 052120 0421 


“4 204 0 020123 054105 
4 042520 052103 04 
4391 012 050015 053517 $DOWN: .ASCIZ <12><15>/POWER DOWN TIME WAS UNDER 2 MILISECONDS / 


MNroroenrr 
ROVER PON FOOWONROONE NT 


i 
N 
RRRRRERRRRRRRRRRRRRERRRRRRRRRRRRERK 


MMMM AVIA AAAI MAMA AAA Ain 


439. 051105 04 053517 

439 116 044524 0425 

4394 2 053440 051501 052440 

4395 2 042116 051105 03104 

4396 2 O 046111 051511 

4397 264 041505 047117 051504 

4398 272 000040 

4399 274 005015 047125 054105 EMI: -ASCIZ <CR><LF>/UNEXPECTED POWER FAILURE ON CPU/ 
4400 302 520 052103 04210 : 

4401 310 050040 0535517 051105 

ret 316 043040 044501 052514 

440 324 042522 047440 020116 

4404 045332 050103 000125 

4405 045336 015 047125 054105 EM2: eASCIZ <CR><LF>/UNEXPECTED POWER UP SEQUENCE ON CPU/ 
44 045344 042520 052103 042105 - 

4407 045352 050040 055517 051105 

a4 045360 052440 020120 042523 

4409 045366 052521 047105 0425 

4410 045374 047440 020116 050103 

4411 045402 125 , : 

ut 045404 005015 046111 042514 EMS: -ASCIZ <CR><LF>/ILLEGAL POWER DOWN SEQUENCE ON CPU/ 
44135 045412 040507 0201 047520 

4414 045420 042527 020122 

4415 045426 047127 051440 050505 

4416 045434 042525 041516 020105 

4417 045442 047117 041440 052520 

4418 045450 000 

4419 045451 015 044412 046114 EM4: -ASCIZ <CR><LF>/ILLEGAL POWER UP SEQUENCE / 
4420 045456 043505 046101 050040 

4421 045464 053517 051105 052440 

4422 045472 020120 042525 052521 


| E 
MA INDE C-11-CEKSG-C PDP=-11/70 SYSTEM POWER FAIL MACY11 3oacios®» 13=-MAR-80 16:04 PAGE 83 
6:04 DATA AREA 


CEKBGC .P11 13-MAR~-80 1 SEQ 0095 
4423 045500 047105 042503 000 
4424 045505 015 052412 042516 EMS: wASCIZ <CR><LF>/UNEXPECTED TRAP TO 4/ | 
4425 045512 050130 041505 042524 
44 0455 0201046 051124 050101 
4427 0455 052040 020117 000064 
4428 0455 005015 047125 054105 EMé6: -ASCIZ <CR><LF>/UNEXPECTED TRAP TO 10/ 
44 045 042520 052103 042105 
44 0455 05 0522 020120 
4431 045556 047524 030440 000060 
ree 045564 005015 047125 054105 €EM7: -ASCIZ <CR><LF>/UNEXPECTED TRAP TO 114/ 
44 045572 042520 052103 042105 
4434 045600 05 040522 020120 
4435 045606 047524 030440 032061 
4436 045614 
4437 045615 015 12 0421046 EM10: .ASCIZ <CR><LF>/ADDRESS ON STACK IS WRONG/ 
4438 045622 042522 051523 047440 
4439 045630 020116 052123 041501 
4440 045636 020113 051511 053440 
4441 045644 047522 04351 000 
444 045651 015 047412 042114 EM11: .ASCIZ <CR><LF>/OLD PS IS WRONG/ 
4443 045656 050040 0201235 051511 
4444 045664 053440 047522 0435 
4445 045672 000 
4446 045675 015 047412 0421 EM12: -ASCIZ <CR><LF>/ODD ADDRESS TRAP FAILED/ 
4447 045700 0404 042104 042522 
4448 045706 051523 052040 040522 
4449 0465714 040506 046111 
4450 045722 042105 000 
4451 062785 04641 046505 EM13: -ASCIZ <CR><LF>/MEMORY CORRUPTED ON POWER FAIL/ 
4452 045 051117 020131 047503 
4453 045740 051122 050125 042524 
4454 045746 020 04711 
4455 045754 053517 051105 043040 
4456 0457 044501 0001 
4457 045766 005015 044524 042515 EM14: -ASCIZ <CR><LF>/TIMEOUT TRAP FAILED/ 
4458 045774 052517 020124 051124 
4459 046002 050101 043040 044501 


4460 1 
4461 rays de 005015 047520 042527 EM15: .ASCIZ <CR><LF>/POWER FAIL RETURNED TOO SOON/ 


4464 046036 042516 0201 04 
4465 020117 0475235 047117 
4466 ern es 000 
4467 015 047012 *052117 EM16: .ASCIZ <CR><iLF>/NOT ENOUGH OR TOO MANY INSTRUCTIONS EXECUTED/ 
4468 046060 042440 047516 043525 
4469 20110 051117 052040 
4470 046074 047517 046440 04 
447) 02 020131 047111 052123 
4472 046110 052522 052103 04 
051516 042440 042530 


4475 1 ae 047516 046440 EMI7: -ASCIZ <CR><LF>/NO MEM. MANG. VIOLATION OR TRAP TO 4/ 


052101 047511 


MA INDEC-11-CEKBG-C 
CEKBGC ..P11 


PDP-11/70 SYSTEM 
135-MAR~80 16:04 D 


S 


052522 
041516 
052103 
040440 
020122 
046106 
020125 
047516 
cress 


044526 
020114 


4440 
052522 
051511 
020040 


020040 
052520 


051505 
020040 
050122 
052123 
042440 


041520 
050040 


EM20: 


EM21: 


EM22: 


EM23: 


EM24: 


EM25: 


DHS: 


DH?7: 


DH10: 


DH11: 


POWER FAIL 
ATA AREA 


-ASC12Z 


ASCIZ 


ASCI2Z 


ASCIZ 


ASCIZ 


ASCIZ 
ASCIZ 


ASCIZ 


-ASCIZ 


-ASCIZ 


F 
MACY11 30a(1059) 135-MAR-80 16:04 PAGE 8&4 
SEQ 00%6 


<CR><LF>/NO ITIST INTERRUPT/ 


<CR><LF>? INCORRECT BRK AND/OR DCF FLAGS? 


<CR><LF>/CPU DID NOT TRAP TO VIRTUAL 24/ 


<CR><LF>/CHECKSUM ON MASSBUS TRANSFER IS WRONG/ 


<12><15>/NO POWER FAIL ON CPU/ 


<12><15>/UNEXPECTED CPU INTERRUPT/ 


<CRO<LF>/IISTID PC CPUERR/ 


\ 


<CR><LF>/ JISTID ERRORPC CPUERR MEMERR/ 
<CR><LF>/TESTNO  ERRORPC/ 
<CR><LF>/TESTNO  ERRORPC PS/ 


047012 


RERRELLLLALLE 
RUN ASS LER ARG RES 


BREA ERAORCE 


RRRRRRRERRREKKEKK 


MIMIN 


000123 
OOG% 16 
04751 
05111 
050040 
042101 


052198 
020106 


WMA A WIA 
—S ~— 


RRA RREARARERE 
MmNN YT 


NO 
wi 


0 02004 
. 050122 


014064 
014064 


000000 
014064 
014064 


014064 
014240 


014240 
020133 
020040 


052123 
Ooh lee 


20104 
054522 
051505 


020040 
059122 
052520 


052123 
020040 


0 0 
044524 
047506 


014250 
014250 


000000 
014240 
014250 
014250 
000000 
014250 
014064 
045517 

000 


-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 
P11 <7 S-MAR-80 16:04 DATA AREA 


DH12: 


DH14: 


DH20: 


DH21: 


DH22: 


DTS: 
DT7: 


DT10: 
DT11: 


DT12: 
DT20: 
DT21: 
DT 22: 


OK: 


G 8 
MACY11 30A(1052) 13-MAR=80 16:04 PAGE 85 


’ 
4 


.ASCI2<12><15>/TESTNO  ERRORPC PAGE ADDRESS REGISTER OF BAD MEMORY/ 
-ASCIZ <CR><LF>/TESTNO ERRORPC CPUERR/ 

-ASCIZ <CR><LF>/TESTNO IISTID ACR PGTE PGCS/ 

.ASCIZ <CR><LF>/TESTNO IISTID FOUND SHOULD BE/ 

-ASCIZ <CR><LF>/TESTNO JISTID ERRORPC/ 

~EVEN 

SREGO, SERRPC , SREG1 0 

SREGO, SERRPC .SREG1,$REG2.0 


STSTNM, SERRPC ,0 
STSTNM, SERRPC ,$REGO.0 


$TSTNM, SERRPC , $REG1 .0 

$TSTNM, SREGO, SREG1 , SREG2, $REG3.0 
$TSTNM, $REGO,SREG1 , $REG2.0 
$TSTNM, SREGO, SERRPC 0 

eASCIZ <CR><LF>/EC OK J / 

»EVEN 


SEQ 0097 


Cee py Tee C 
CEKBGC P11 15-MAR-80 16 


1866 o20000 
51266 
11266 


000001 


AREA 


PDP=-11/70 SYSTEM POWER FAIL 
704 DATA 


ERRBUF: .BLKW 
"wane 


DSKBUF : 


END: 
END 


H 
MACY11 3oat059) 13-MAR-80 16:04 PAGE 86 


1 ;ERROR ASCII MSG STORAGE AREA 
$8000 >MASSBUS BUFFER AREA ; 


SEQ 0098 


a C 80 1 a SYSTEM POWER FAIL MACY11 30a 1059) eee 16:04 PAGE 88 





MA INDE 
CEKBGC P11 CROSS REFERENCE TABLE -~ USER SYMBOLS 
S 024540 1871 18774 
ABASE = 000000 735 776 
ACDW1 = 000000 735 778 
ACDwW2 = 000000 779 
ACPUOP= 000000 735 750 
ACR 017030 1128* 1131* 1134 1144* 11658 1171% 1174 1178* 1218 1221* 
1243 12467 1255* 1265* 1828* 1834 1922* 1990* 1993* 1999 2 
$4 * 2296* 2347 2405* 2458% 2509*% 2567" 2619* 2670*  2728* 2916 
ADDWO = 000000 735 780 
ADDw1 = 000000 735 781 
ADDW10= 000000 735 7 
ADDW11= 000000 735 791 
——- 000000 735 792 
ADDw1 5= 000000 735 793 
ADDW14= 000000 735 7 
. ADDW15= 000000 735 795 
per = 000000 735 782 
ADDWS = 000000 735 783 
ADDWS = 000000 735 7 
ADDWS = 000000 735 785 
ADDW6 = 000000 735 786 
ADDW7 = 000000 735 787 
ADDW8 = 000000 735 788 
ADDWI = 000000 735 789 
ADEVCT= 000000 735 741 
vm = 000000 735 
ADR 017032 8834 1132 1145 1166* 1167* 1172 1175" 1176* 1179 1223* 1258* 1261* 1263* 
Le 1994 2001 2002 2017 2406* 2409* 24118 2568% 2571* 2573* 2729* 2732+ 
x 
AENV = 000000 735 746 
NVM = 000000 735 747 
AFATAL= 000000 735 738 
AMADR1= 000000 735 763 
AMADR2= 000000 735 767 
AMADR3= 000000 735 770 
AMADR4= 000000 735 773 
AMAMS1= 000000 735 757 
$- 000000 735 765 ’ 
= 000000 735 
= 000000 735 771 
= 000000 735 743 
AMSGLG= 000000 735 744 
AMSGTY= 000000 735 737 
AMTYP1= 000000 735 758 
AMTYP2= 000000 735 
AMTYPS= 000000 735 769 
AMTYP4= 000000 735 772 
APASS = 000000 735 740 
= 000000 735 
APTCSU= 000040 36484 
= 000001 3518 3604 36464 
APTSIZ= 000200 1079 36454 
000100 36474 


ASWREG= 000000 
ATESTN= 000000 735 739 


J 

A's oD ee PDP-11/70 SYSTEM POWER FAIL MACY11 300.1059) 13-MAR-80 16:04 PAGE 89 

CEKBGC .P11 1 ~80 16:04 CROSS REFERENCE TABLE -- USER SYMBOLS 

AUNIT = 000000 735 742 

AUSWR = 000000 735 749 

AVECT1= 000000 735 7 

AVECT2= 900000 735 7 

BAD 025160 1966 19744 1989 

BEGIN 1450 1250 

BF ADR 17042 8874 2203 2208 2212 2218 2239 2244 2252 2257 

BITO = 9000001. 1984 502 1093 1152 1154 1167 1176 1259 2407 2569 2730 2984 

BITOO = 000001 1884 198 

B1102 = 900006 186" 196 

= 

BITOS = 900010 84195 

BIT04 = 000020 1844 194 2968 

BITOS = 000040 1834 193 

BITO6 = 000100 1824 192 

BITO7 = 000200 1814 191 

BITO8 = 000400 1804 190 

BITO9 = 001000 1794 189 3450 

BIT1 = 000002 1974 503 

BIT10 = 002000 1784 543 

BIT11 = 004000 1774 542 1132 1172 1179 

BIT12 = 010000 1764 541 

BIT13 = 020000 1754 

BIT14 = 040000 1744 513 1853 3434 

BIT15 = 100000 1734 5 1128 1221 1239 1243 1247 1265 1828 1922 2047 2129 
2347 2458 2509 2619 2670 2927 

BIT2 = 000004 1964 1223 1991 

BITS = 000010 1954 505 

BITS = 000020 1944 549 1327 1371 1401 1436 1472 1478 1502 1510 1541 1548 
Ue Le 1590 1616 164C 1648 1670 1678 1700 1708 1730 1738 1764 

BITS = 000040 1934 511 548 1849 

BIT6 = 000100 1924 510 547 3004 

BIT? = 000200 1914 546 2976 2982 2995 3007 

BIT8 = 000400 1904 545 1860 3878 

BIT9 = 001000 1894 544 1189 1213 1856 1879 1886 2915 3510 

BMSK 017040 8864 1052* 1166 1186* | 

BOOT 014526 8084 2341* 2365 2386 2503* 2527 2548 2664* 2688 2709 2858 

BOXNUM 014646 8354 23635 2525 2686 2805* 2819* 2831 

BPTVEC= 000014 2054 

BUFCLR 032566 2378 2701 28404 2843 

CACHVE= 000114 21354 1505* 

CKSUM 014650 8364 1361* 1362* 1363* 1382 2206* 2209* 2210* 2222 2242* 2245* 2246* 

CONTRL= 177746 222eh §=91189x 1203* 1213* 2915* 3039 3099* 3114% 3115* 3183 3243* 

COUNTO 016754 8624 3055*  3064* 3066 3126 3$200* 3209* 3211 

COUNT? 016756 86354  3069* 3070 3214* 3215 

C 8644 30735* 3074 3218* 3219 

COUNTS 016762 8654 3077* 3078 3222* 3223 

CPUACT 016774 8704 1043 1127* 1177* 1191 1259 1822 1896 1925 1928 2050 2053 
$136 2135 2159 2169 2288 2407 2450 2569 2611 2730 2795 3305 

* 

CPUER 040650 1086 1092 1098 1481 1515 1552 1583 1652 1682 1712 1742 1776 
2300 2351 2462 2513 2623 2674 2830 2865 2887 39728 

CPUERR= 177766 2344 2947 3973 


CPULS1 016770 8684 1191* 1192* 1983 2005 2028 2101 
cPO == 000001 


va 


SEG 0100 


2296 


aN 


2261 


2090 
3395 
1850 
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CEKBGC P11 CROSS REFERENCE TABLE -=- USER SYMBOLS SEQ 0101 
cP1 = 000002 5034 
cre = 000004 5044 
cP = 000010 5054 
CR = 000015 1104 3881 3978 3983 3987 3993 4000 4007 4018 4025 4034 4045 4058 
4064 4069 4080 4084 4091 4096 4102 4152 4399 4405 4412 4419 4424 
4428 4432 4437 4442 4446 4451 4457 4461 4467 4475 4482 4486 4492 
4498 4515 4520 4527 4531 4546 4551 4559 4566 4588 
CRLF = 000200 1114 
C1 016722 8504 1947 
C 016724 8514 
C 7004 8744 9 
7 490# 1144 1993 2010 
DDISP = 177570 1044 686 687 688 689 
563 912 954 966 984 990 1026 1032 45274 
DH11 960 45314 
DH12 0 972 45 
DH14 046727 978 45464 
046762 1002 45514 
DH21 047037 1008 455 
047107 1014 1020 45 
DH 046461 936 45154 
DH7 046514 948 45204 
DIGITS 037640 3689* 3690*  3691* 3692 3693* 3707 3709* 3724% 37378 
DISPLA 014170 6864 1088* 1303* 1357* 1393* 1428% 1463* 1492* 1532* 1561* 1607* 1631* 1661* 
1691* 1721* 1751* 1779s 19178 2043* 2125% 2281% 22978 2348* 24435* 2659% 2510 
2604* 2620* 2671* 2766* 3465* 3488* 
DISPRE 17 5574 
DSKBUF 051266 7 45924 
DSWR = 177570 1034 682 683 684 685 
DT10 047166 913 955 967 985 991 1027 1033 45774 
DT11 047174 961 979 997 4578 
DT12 047204 973 4 
D 047214 1003 45824 
DT21 047230 1009 45844 
DT22 047242 1015 1021 
OT5 047144 93 45734 
DT? 047154 949 45754 
D1 "16726 8524 2090 
D 0167 85 2072 
17006 8754 2073 
EMTVEC= 20 1063*  1064* 
045274 911 43994 
EM10 045615 953 4437# 
045651 959 44424 
2 045673 965 44464 
EM13 045725 971 44514 
EM14 045766 977 4457# 
046014 983 44614 
EM16 6053 989 44674 
EM17 046132 995 44754 
E 045336 917 44054 
E 04 1001 44824 
EM21 046225 1007 44 
EM2 press 1013 44928 
EM2 046 1019 44984 
EM24 046377 1025 45054 


8 
ns tt ee | a SYSTEM POWER FAIL MACY11 30a (1052) | ei 16:04 PAGE 91 
CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0102 


EM25 046426 1031 45094 
EM3 045404 923 44124 
EM, 045451 929 4194 
EMS eet 935 44244 
EM6 0455 941 4284 
EM? 045564 947 44324 
END 111266 3718 5934 
ENT 033226 2392 2554 2715 29154 
ENTREE 014542 8144  2286* 2288 
ENT 014544 8154  26448* 2450 
ENTR24 014546 8164  2609* 2611 
EOPLID 036226 3333 3342 335 3360 34094 
E 047266 3716 3720 45914 
ERRDIS 04 5 1991 7 39704 
ERRLCK 017002 8734 3532* 3576* 3822 
ERRTAB 014702 1086* 1092* 1098* 1465* 1481* 1494* 1515* 1534* 1552* 1564* 1583*  1633* 
1652*  16635* 1 * 1693* 1712* 1723* 1742* 1754* 1776* 1847* 1850* 2300* 2351* 
2462* 2513% 2623* 2674* =2805* 2830*  2865* 2887* 3970 
eeee gone eos 1069* 1085* 1091* 1097* 3439 3440* 3442 3445 
EXIT 014540 iin 2290* 2302 2343 2356* 2452% 2464 2505 2518*  2613* 2625 2666 2679* 
* 
EXTRA 016772 8694 1049 
E1 016732 8544 2154 2159 
E 016734 8554 2155 
017010 8764 2156 
FACTOR 017066 8934 
FIRST 017036 8854  1051* 
F 014602 8254 1563* 1584 3967*  3968* 
016736 8564 3396 3398* 
FORKTB 021252 1228 12334 
= tkeeee eit 3316 3323 3330 3339 3348 3357 3366 3571 3957 3958 3959 3960 
HE RE 040300 38694 3902 
HIADRS= 177742 2204 
HIBOX 014550 8174 2309 2310 2311 2371 2372 2373 2471 2472 2473 2533 2534 2535 
2632 2633 2634 2694 2695 2696 2822* 2888 2890 2893 3149 3150 3151 
HICORE 014532 8104 2369% 2427* 2531* 2589*  2692* 2750* 3137 
HITMIS= 177752 2244 
a = ioe 5144 
= 000011 1084 
FLOW 035322 3227 32654 
ILLDWN 034442 3083 31214 
ILLUP 034436 7. 31184 
INTMSK 017000 8724 1175 1187* 
OTVEC= 20 2064 
TDIS 0602 1898 39654 
ISTTAB 014672 8414 1 * 1989* 1995* 3965 
TVEC 017034 8844 1147* 1251 1253* 1898* 2392 2554* 2715* 
K 2360 3764 
KDPAR1= 172362 3774 
KDPAR2= 172364 3784 
KDPAR3= 172366 3794 
KDPAR4= 172370 3804 
KDPARS= 172372 3814 


MAINDEC-11 
CEKBGC .P11 


ee 


7 


Nm 


Aiaiiniatalontntniatnls 
RESIS 


ae 
Rue 


— St SH Ss SS SS Ss Ss 3 2 OP SS SS PS BV YS 
SAAS 
SII S23SSSSu 
MALMO Nm o 


3824 


~<cene-s PDP-11/70 SYSTEM 
135-MAR~-80 16:04 


3043 


POWER FAIL 
3094 3187 
2371* 2471 
2372%  2472% 
2373%  2473% 
2868 2875 
2891*  2906* 
2894%  2907% 
* 3145 
2957* 3140» 
2959 3142 
2961* 3144 
2889* 
2963* 
2967* 3146 
3978 3983 
4080 4084 
4437 4442 
4520 4527 
7x 3011* 
1983 1987 
2005 2007* 
3070 


3238 


2 
3074 


3993 


2846* 
2848* 
2850* 


3207* 


2956* 
2958* 
2960* 


3211 


M 
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CROSS REFERENCE TABLE -- USER SYMBOLS 


3215 


4034 
4412 
4482 


3219 


SEQ 0103 
4045 058 
4419 4424 
4486 4492 
3225 
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CEKBGC .P11 1 ~80 16:04 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0104 
MAPH1S= 170266 4214 
MAPH16= 170272 4234 
MAPH17= 170276 425m 
= 170 is 4634 
1s 4274 
is 1 4294 
= 17031 4314 
18 16 4334 
4= 1 4354 
S= 170326 4374 
170 4394 
7= 170336 4414 
= 170216 4654 
a. 170342 4434 
1= 170346 4454 
MAPH 52= IR aee 4474 
mapnissa 170356 4494 
= 170362 4514 ® 
MAPHS5= 170366 4534 
MAPH 170372 455 
MAPH37= 170376 4574 43047 3090 3191 3234 
MAPH4 = 170222 4674 
MAPHS = 170568 4694 
MAPH6 = 1702352 4714 
MAPH7 = 170236 4734 
MAPLO = 170 4584 
MAPL 170 3944 458 3045 3092 7189 3236 
MAPLO1= 170204 3964 460 
MAPLO2= 17510 3984 462 
MAPLOS= 170214 O04 464 
MAPI.04= 1850 4024 466 
MAPLOS= 170 $3 4044 468 
MAPLO6= 1702 4064 470 
MAPLO7= 170234 4084 472 
MAPL1 = 170204 4604 
MAPL10= 170240 4104 
MAPL11= 170244 4124 
uot iS 170250 4144 
MAPL15= 170254 4164 
MAPL14= 170260 4184 
MAPL15= 170264 4204 
ma ie 170270 4224 
MAPL17= 170274 4244 
MAPL2 = 170210 4624 
MAPL 1 4264 
MAPL 21= 1” 4284 
MAPL ¢: 170310 4304 
MAPL 170314 4324 
MAPL 24 18 4344 
MAPL25= 1 4 4364 
MAPL 170 4384 
MAPL 170334 4404 
MAPL 170214 4644 
MAPL 170340 4424 
MAPL31= 170344 4444 
MAPL 32= 170350 4464 


6 9 
~~ = hile SYSTEM POWER FAIL MACY11 30A(1052) 13-MAR-80 16:04 PAGE 94 





CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0105 
170354 4484 
170 4504 
170 4524 
170 4544 
170374 4564 
1 4 
1 4 4 
1 47 
1 4724 
01 8314 1862+ 1865* 1875* 1885* 1886* 2174 2198 2231 2978 
0 2205 2214 2241 2254 29754 
177744 Pal 8 2951* 
MEMS IZ Oseeee ¢ 2504 2665 28014 
MMERR 055534 85 ; at 29714 2972 2985* 2986* 2987* 2988* 2989* 2990* 2991* 2992+ 2993 
MARO = 177572 2444 248 1758* 1774* 2304* 2312* 2317% 2374%* 2622 2426* 2666* 2474% $2479 
2536* 2584 2588*  2627* 2635%* 2640* 2697* 2745 2749* 2866* 2883+ 2898* 2902+ 
3034 3103 3152* 3178 3247 
MRI = 574 2454 .°) 
MARZ = 177576 24 250 
MARS = 172516 2478 2854* 2968 3040 3098* 3147x 3184 3242 
MMVEC = 000250 2154 1756%* 2855* 2969* 3148 
Mpr 016737 8574 1093* 1099* £1122 1249 1780 3112 3290 3325 3830 
MPSW = 000100 5104 1082 1089 
MSTENT At Se 1211 12254 
MSO 021342 1233 12494 
MTC = 000015 4924 
NCX = 010000 S414 1965 2088 2194 
NODEV 044147 2179 42904 
017012 8774 2023* 2325* 2618* 2487* 2580* 2648* 2741* 2932% 3535* 3837 3840* 
NORH70 024516 18724 1902 
NORP 024664 1847 19014 
= 002000 5434 
NX TDRV Os 9385 1854 1859 18674 
047252 2401 2563 2724 4 
PARERR Os3 0 1305 
PARFLG 0O 2 1306* 29444 2952+ 
PATCHK 014530 8094 2376* 2620* 2538% 2582* 2699* 2743* 2870 
PATTRN 032700 2377 2421 2539 2583 2700 2744 28584 
PFDT 014622 8294 
PFFT 014612 on 1753* 1965* 2088* 2194* 2299% 2350% 2467* 25128 2622* #2673* #2787* 3169 
PGCS = 000001 4 1171 1178 1222 1990 
PGF = 000005 4884 
PGTE = ta 4834 1165 1255 2000 2405 2567 2728 
PI = | 2 1024 
PIRQVE= 40 2144 
Oar 4 1304 1513 1593 30254 3107 
POWUP 034256 3061 30824 
PRO = 000000 1354 
PR1 = 000040 1364 
PR2 = 000100 1374 
PRS = 000140 1384 
PRA = 000200 1394 
PRS = pecs 1404 
PR6 = 000 1414 


~CE C PDP-11/70 SYSTEM 
CEKBGC .P11 <I S-MAR-80 16:04 


MAINDEC-11 
PR7 = 0 
BS = 177776 
PSW = 177776 
PUT 017062 
PWRDIS 
PWRFL 01452 
PWRTAB 014662 
= $3 
P21 026432 
RELODN 014536 
RELOHI 033042 
RELOLO 035166 
LOUP 014534 
RESTAB 037064 
RESTRT 020000 
RESVEC= 000010 
ROUTE 014562 
RPAS = 176716 
RPBA = 176704 
RPCC = 176736 
RPCS1 = 176700 
RPCS2 = 176710 
RPDA = 176706 
RPDB = 176722 
RPDC = 176 
RPOS = 176712 
RPDT = 176726 
RPECT = 176744 
RPEC2 = 176746 
RPER1 = 176714 
RPER2 = 176740 
RPERS = 176742 
RPLA = 176720 
RPMR = 176724 
RPOF = 176732 
RPPGM 016742 
RPSN = 176730 
RPSRC 024414 
RPWC = 176702 
SAVRG 014552 
SAV6 014572 
SOP 72260 
SDPAR1= 172262 
SDPAR2= 172264 
SDPAR5= 26566 
SDPAR4= 172270 
SDPARS= 172272 
= 172274 
SDPAR7= 172276 
172220 
SDPDR1= 172222 
SDPDR2= 172224 


1424 
998 


1544* 
eee 


. 
MACY11 30A(1052) 


POWER FAIL 13-MAR-80 16:04 PAGE 95 
CROSS REFERENCE TABLE ~~ USER SYMBOLS 

1320* 1330* 1358* 1394 1404* 14298 1439% 1464* 
1574* 1608* 1632* 1643* 1645* 1662* 1673* 1675* 
1735* 1752*  3006* : 

2291* 2453* 2614* 3038 3100* 3182 3244* 

1952* 2011 2075* 2158* 

1521 39674 

2340* 25397 2414 2483 2502* 2559 2576 2644 
1506* 1513* 1586* 1593* 1846* 2929*  3025*  3061* 
3227* 3255* 3969 

1068* 1307* 1308* 

2318* 2425* 2677 2480* 2587* 2638 2641* 2748 
2690 28864 

2747 29054 

2313* 2370* 2468 2475* 2532* 2629 2636*  2693* 
35794 

3397 

3939 

2213* 2240* 2253* 2976 2984* 2997 

1852* 1863 1878*  2978* : 

1856 1860 1879 2982 2995 

1870 

3938 

3084 3199* 3228 


1493* 
1692* 


2663* 
3083* 


ae 


SEQ 0106 


MA INDE C-11-CEKBG-C 


CEKBGC.P11  13-MAR~80 1 
SDPOR3= 172226 3134 
SDPORG= 1722 3140 
SDPORS= 172232 3154 
= 17 3164 
SDPOR7= 1 3178 
SEC2 024220 1311 
SED = 546e 
SETCLK 0 3002" 
SETMM 032604 2308 
SEU = 000100 5474 
SID = 001000 5448 
SIGNAL 014642 833" 
* 
SIPARO= 172240 3218 
SIPARI= 172242 3224 
SIPAR2= 172264 3234 
SIPAR3= 172246 3248 
SIPARG= 172250 3254 
SIPARS= 172252 3264 
SIPARG= 172254 3278 
SIPAR7= 172256 3284 
IPDRO= 172200 299 
SIPDRI= 172202 3004 
SIPDR2= 172204 3014 
SIPDR3= 172206 3024 
SIPDR4= 172210 3034 
SIPDRS= 172212 
SIPDR6= 172214 3054 
SIPDR7= 172216 3064 
SIU = 545M 
SIZEHI= 1777 2314 
SIZELO= 177760 2298 
SIZEND 024630 1866 
SIZMBS 024370 184 7H 
SLVENT 021140 1147 
SLVID 014644 8344 
Su 21262 1234 
SL2 021302 1235 
SL3. «(021322 1236 
SRO = 177572 2484 
SR1 = 177574 2498 
SR2 = 177576 250M ° 
SR3. = 172516 2514 
SSD = 5484 
SSU = 000020 5494 
STACK = 013776 934 
START 014502 8034 
2863 
STCS = 000003 4864 
STF = 000006 4894 
STKLMT= 177774 1014 
STOP = 014462 
STRT_ 020064 575 
STS17 025376 1995 
STTE = 00000 4854 
STO ~=—s-« 021076 1124 


PDP-11/70 SYSTEM 
6:04 . 


18174 


2470 


1938* 
3253* 


POWER FAIL 


1819 
2631 28464 2862 2886 
1968* 1996* 1998* 20928 2113* 2115* 
3096 3185 3240 
18944 
1215 
2088 2194 3251 

691 692 693 
2520 2681 2810* 2811* 2812 2814* 
2807* 2808*  2809* 2815 2817* 2818* 
10574 


. 9 
MACY11 30A(1052) 135-MAR-80 16:04 PAGE 96 
CROSS REFERENCE TABLE -- USER SYMBOLS 


2196* 2225* 
2818 2820 
2868 


2227* 


2822 


2264* 


2824* 


7 
SEQ 0107 


2266* 


2860 


MA INDE (-11-CEKBG-C 
13-MAR-80 16: 


CEKBGC P11 


SUPSTK= 013576 
SwWR 014160 


SWREG 000176 
SWwO = 000001 
SWOO = 000001 
swO1 = 000002 
- 
Su0s = 000010 
SwO4 = 000020 
SwOS = 000040 
SWO6 = 000100 
SWO7 = 000200 
SwO8 = 000400 
swo9 = 001000 
SWI = 000002 
SwW10 = 002000 
SW11 = 004000 
ie = 010000 
Sw13 = 020000 
SwW14 = 040000 
SW15 = 100000 
SWw2 = 000004 
SW3 = 000010 
SW4 = =_:« 000020 
Sw5 = 000040 
SW6 = 000100 
Sw7 = 000 
Sw8 = 0004 
Sw9 = 001000 
SYNC.1 014712 
SYNC.2 014714 
SYNC.3 016776 
SYSTID= 177764 
S2L0G1 016716 
OG2 0167 
S2L1 017026 
TBITVE= 00001 
Tl = 004 
TIMIT 034446 
TKVEC = 
™1 040644 
T™10 041143 
T1100 041724 
T™™101 041750 
™102 042021 
™103 2052 
™104 042115 
™106 042534 
™107 042 
M108 045226 
™109 4206 


oO 
Ww 
ay 


st 
Bit 
Severe 


nV 


ed eed ed ced ce eed ed ed ee ed eed eed eed eed A 
LVS VL AVLeVe 


~— — 
NWO 
BO 
iNOO00 


— i ss 3 
SRALAREGSSS 


1349 
1777 


1387 


PDP=11/70 SYSTEM POWER FAIL 


1309 


1420 


2581 
41524 


1087* 
1420 
2565 


1454 


2194 


2649 


9 
MACY11 30a(1052) 13-MAR-80 16:04 PAGE 97 
CROSS REFERENCE TABLE -- USER SYMBOLS 


1089 1103 1104 1109 =: 1113 
1454 1482 1524 1553 —- 1599 
2726. 2768 34346 3450 3495 
1482 1524 1553 1599 1623 
2248*  2250* 3254« 

2063* 2093* 2098* 2103* 2146s 
2646*% 2449% 2607* 2610* 2791* 
2787 

2742 ©4096 


1653 


2184* 
2794* 


1683 


2201* 
3288* 


SEQ 0108 


1206 
1683 


1713 


2228* 
3295* 


= 





F 9 

MAINDEC=11=CEKBG=C | PDP=11/70 SYSTEM POWER FAIL MACY11 30A(1052) 13-MAR-80 16:04 PAGE 98 
CEKBGC.P11 ~80 16:04 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0109. 
™11 041176 1158 40184 : 
™110 044270 2707 «= 4305 | 
™111 045163 2024 2933 4385 
mie 941207 1161 0204 
T™1 041261 1317, 40254 
™14 041605 13140 
™15 041635 1826 406 
T 040676 1108 398 
™% 040723 1117-39878 
™S5 040765 1120 3993 
™ 041033 1102 
™? 041100 1100  4007# 
™™76 =: 041665 1136 © 4074a 
177041713 1955 2078 2163 2334 2496 2657 2779 4078 
TPVEC = 000064 2114 

017024 880" 3841* 3857*  3867* 3907* 

= 000034 2094 1065* 1066* 

TRIVEC= 14 204M | 
TST1 021450 1229 1230 1231 1232 1260 1244 12468 1302" 1350 3579 3580 3581 3582 
TSTIO 0227 15604 1 
TST11 0231 16064 1624 
TST12 023252 16304 1654 
TST13 023406 16604 1684 
TST14 023542 16904 1714 
TST15 02367 17204 1744 
TST16 024032 17504 1778 
TST17 024674 1899 19164 1971 1976 2008 2033 
TST2 021704 13564 1388 
TST20 025524 1934 2042% 2095 2116 
TST21 026114 2059 «= 2126H «=2185 = 2202S 2229'S 2237 = 2268 
TST22 027076 2141 22804 
TST23 030120 2305 2345 2357 2442m . 
TST24 = 031142 2467 2507 2519 26034 | 
TST25 032164 2628 2668 2680 27654 
TST3 022044 13924 ©1421 
TST4 =: 022176 14274 1455 
TST5 2330 14624 1483 
TST6 § © 022444 14914 1525 
TST7 2636 1531# 1554 
TS17A 025050 1943 19514 
1S17B 025172 1945 1979# 1981 

025674 2067 = 2074# 
TS20B 026006 2069 # 2099 
TS21A 026270 2150 21574 
TS21B 026656 2152 
TS22A 027352 2294 23314 
TS22B 027162 2293 2296 2314 2316 2319 2324 2327 
TS23A 030374 2456 2493 
TS238 030204 2455 26584 2476 2478 2481 2486 2489 
TS24A 031416 2617 =. 2654 

031226 2616 2619 2637 2639 2642 2647 2650 2934 
TS25A 032232 2774 2776# 
TS 322 2775 «= 878 7H 
TYPDS = 104405 1138 1160 1874 1889 1892 1963 2086 ‘2181 2192 2382 2544 2705 3320 

3335 33344. 3353S 3362S 3370 )=S 39614 

TYPE = 104401 1076 1102 #1108 1111. «+1112 «1117 «©1120-1186 «19571958 «11767 


_—-—-} 
' 





MA INDE C-1171-CEKBG-C PDP-11/70 SYSTEM POWER FAIL MACY11 soa soso) 13=MAR-80 16:04 PAGE 99 
CEKBGC P11 13-MAR=80 16:04 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0110 
1314 +1317.+«1318~=S—«(1826~—S—«‘N872 7 18 1955 1961 1964 1988 2024 
2078 ~=«-.20 2087 2106 «= 2168—Ss—«179~Sts«1B2—Ssi2183.—Ss «2190-2193 22362251 (3267 
5326 (53 53 $384 5401 3419 3488 3496 23541 3566 3563 2581 3649 
2657 2702 «27072724 8742 8779 8785 2786 «8797 0833 0983 S108 Sik 
$351 $327 $328 3336 3337 $346 ; ss es ta tn & 
3541 35433548 «= 3550 «Ss 3569 857% 3801 39574 
TYPIT 040504 3 3ag8 40 3890s 3 39154 
TYPLCK 01 Se 1054" «=—-3534x «= 3575* «3824 
TYPOC = 104402 1110, 35673958" 
TYPOS = 104403 1958. 2081.~«S«s«2166.~—Ss« 2337S s«499s« 2660S s«2782—Ss«3959 
TYPQUE 014716 gu7"  1070* 7071* $302 $393 %401* 3402" 3844 38478 3851 3854" 3871 3873 
3876* 3893 3895 3898" 3905» 3906s 
UBCR2 = 170016 4744 1327* 1371* 1401* 1436* 1472* 1478* 1502* 1510* 1541* 1548* 1572* 1579* 
1890s 1616" 1640* 1648* 1670* 1678" 1700* 1708" 1730« 1738" 1764« 3028« 
UBE F 016740 8584 1118* 1121* 1315 1322 1340 1366 396 1410 1431 1445 1467 1476 
1497 1508 1536 1546 1567 1577 1588 1611 1635 6 1665 1676 1695 
1706 41725. + «1736.~=t«<‘2W789~=té«é‘i76B~SC8026.—Ss«310B8-~=—s« 3394 «= 34008 
UBELCK 017022 879" 1354% 1368 1308* 1433" 1469% 1499 1538* 1569% 16138 1637" 1667* 1697s 
1727" 1761" 3110* 
UBESW = 0 s11#@ «1113 
77660 RBH 
UDPART= 177662 5898 
UDPAR2= 177664 
UDPAR3= 177 Son 
UDPARG= 177670 5928 
UDPARS= 177672 5034 
UDPAR6= 177674 Sou 
UDPAR?= 177676 $o5# 3036. «= 3101S 's«3180— 3245 
UDPDRO= 177620 5 66H 
UDPDRI= 177622 567# 
UDPDR2= 177624 
UDPDR3= 177626 5698 
UDPDR4= 177630 5 70H 
UDPDRS= 177632 S7 1H 
= 177634 5728 
= 177636 7 
UIPARO= 177640 S77H 
UIPART= 177642 5 78H 
UIPARZ= 177644 5 79H 
UIPARS= 177646 58 
IPARG= 177650 5814 
UIPARS= 177652 5824 
UIPAR6= 177654 58 
UIPAR7= 177656 584M 
UIPDRO= 1 5554 
UIPDRI= 177602 55 
UIPDR2= 177604 SS 7H 
UIPDR3= 177606 55 
UIPDR4= 177610 55 On 
UIPDRS= 177612 5604 
UIPDR6= 177614 561# 
UIPDR7= 177616 5 62H 
UNIEOP 036032 3326 33684 


= eeeeee (J 3305 


LLL TT — 


MAINDEC=11 
CEKBGC .P11 


YELLIM 


eee 


SEeESEEL 


eee: 


ae 
26 


eRh 
eee 


SEOPSG 


00000 
014226 


014364 
0143353 


“a0 


. © 


+ li SYSTEM POWER FAIL 
CROSS REFERENCE TABLE -- USER SYMBOLS 


317 
3558" 


3561* 


9 
MACY11 30a(1053) ied 16:04 PAGE 100 


3562 3565* 3566 
7154 7174 7194 
7154 7174 7194 
722h 7234 7244 
1162 1220* 1838 1873 1891 1962 2012 
1157 1318 1964 2087 2182 2193 2785 
3543 3550 3574 
33914 
3628 
3817 
32874 3289 
3301* 3303 3404* 


2085 


33527 


2180 


3336 


SEQ 0111) 


2191 


3345 


} 
| 
: 


MAINDEC-11-CE C PDP-11/70 SYSTEM 
CEKBGC ..P11 <TS-MAR-80 16:04 


SERFLG 
SE 


036416 
014344 


4006 
vi oases 


33844 


605 


POWER FAIL 
3448 3455* 
3372*  3490* 
3468 
3492+ 3493 
3343 3352 
3463* 3513 
3626 3635* 
3520 3536 
3461* 3466 
3453 3462* 

7364 3457 
3637* 36414 
3615 
3618* 3630 
2106 2236 
13894 14244 
2039H 21214 
37344 
3689 3692* 
34654 
3305*  3306* 


e. 
MACY11 30A(1052) 
CROSS REFERENCE TABLE -- USER SYMBOLS 


3468 


4573 


3468 
3468 


3634* 


13=MAR~80 


3486* 

4575 4577 4578 
3373 3489* 

3512 

2267 2797 

14884 15284 15574 
24394 26004 27624 
37364 

3407 


16:04 PAGE 101 


4580 4586 


16034 16274 165784 


16878 


SEQ 0112 


1717@ 


. 


——_—_—_— 


9 
MAINDEC~11~CEKBG~C PDP-11/70 SYSTEM POWER FAIL MACY11 30a (1053) oo 16:04 PAGE 102 


CEKBGC .P11 13=MAR-80 16:04 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0113 
SPASTM 000236 
$PGMi 3 = 043752 1887 42 
aon 044000 8 42728 
044014 1893 42744 
SPOWER 034464 1832 31 
SPSWR 014660 8384 103* 1106 3391 3403* 
SPWRDN 56 1846 2929 31684 3255 
SPWRUP 035142 3201 32274 
SQUES 14332 7284 
SROCHR= seee08 3964 
SRDODEC= eeee08 3964 
SROLIN= *ee000 3964 
SRDOCT= *eee08 3964 
SREGAD 014236 7074 
SREGO 014240 7094 1836* 4573 4575 4578 4582 4584 4586 
SREG1 014250 7114 1999* 2020* 2875* 2947 3973* 4573 4575 4580 4582 4584 
ot 014260 7134 2001* 2021* 2948 4575 4582 4584 
SRE 014270 7154 2002* 4 
G 01 7174 
$R = eeeeene | 3964 
SSAVRE= seeeee 964 
SSCOPE 036252 34334 
SSETUP= 000034 5844 3292 3434 
SSTUP = 177777 5844 
SSVLAD 036356 3443 3449 34564 
$SVPC = 000 5634 568 
= 141000 14 17 724 728 1304 1358 1394 1429 1464 1493 1533 1562 1608 
1632 1662 1692 1722 1752 1918 2044 2126 2282 2444 2605 2767 3284 
292 3383 3406 3407 3427 3428 3429 3430 3434 3446 3448 3449 3450 
3456 3462 6 3468 
SSWREG 014360 7484 @=1081 1087 
£ = 000000 30 
STESTN 014342 7 3459 
$TKB 014212 6954 2842 
$STKS Oe6iG 2390 2395 2552 2557 2713 2718 2840 
STMPO 014310 7194 1156* #£«21159 
STMP1 014312 7204 
STMP2 014314 7214 
STMP5 014316 7224 
STMP4 014320 7234 
$™N = 000026 14 11 1299 1303 13044 1349 1353 1357 13584 1387 1393 13944 
1420 1424 1428 14294 1454 1459 1463 14644 1482 1488 149 14938 1524 
1528 1532 153354 1553 1557 1561 15624 1599 1603 1607 1623 1627 
1631 16324 1653 1657 1661 16624 1683 1687 1691 16924 1713 1717 1721 
17224 §=1743 1747 1751 17524 1777 1913 1917 19184 39 3 20444 2121 
Ate 21264 2277 2281 22824 2439 2443 24444 2600 O54 2762 27 
$TPB 014216 6974 3917* 
STPFLG 014223 7014 
STPS 014214 6964 391 
STRAP 040520 1065 39314 
STRAP2 040554 39454 3956 
STRP = 000006 39494 39584 39594 39604 39614 539624 
TRPAD 040566 “7. 39564 


STSTM 000234 
STSTNM 014002 6154 1951* 1957 1979 2074* 2080 2097* 2157% 2165 2230* 2283* 2536 2445* 


9 
Ce OS non > 0 hl SYSTEM POWER FAIL MACY11 30A(1052) Lroweree 16:04 PAGE 103 


CEKBGC .P11 CROSS REFERENCE TABLE -~ USER SYMBOLS SEQ 0114 
2498 eens" 2659 2767* 2781 3427 3456* 3459 3465 3468 3488 3559 4577 
4578 4580 4582 4584 4586 
SIYPBN= seeee2 | 3962 
STYPDS 037642 37544 3961 
STYPE 040072 3623 38164 3825 3949 3957 
STYPOC O 36834 3958 
STYPON 037402 3682 36854 3960 
STYPOS 03734 7 3959 
SUNIT 01435 7424 
SUNITM 000240 6044 
014 7494 
SVECT1 014406 774A 
SVECT2 014410 7754 
SXTSTR O 34374 
T4= 33834 33844 
S$STP 014200 904 1057 1208 1237 1241 1338 1406 1407 1441 1442 
1474 1514 1543 1551 1610 1622 1642 1651 1672 1681 1702 1711 1732 
1741. 1766 1775 1829 1921 28 2298 2460 2511 1 2672 
2928 3032 3176 3298 3405 
SOFILL 037635 3679* 3683* 3693 37354 
S4OCAT= eeenee 3434 
= 111270 5524 5564 563 5644 5664 5684 574A 5764 589 5904 5924 6124 
731 8474 10414 1130 1169 1207 1325 1336 1343 347 9 1399 1413 
1417 1434 1448 1452 1470 1500 1518 1522 1539 1570 1614 1638 1668 
1698 1728 1762 2016 2429 2591 2752 3119 3122 32635 3267 3317# 3407 
34084 3468 35064 36444 38104 45904 45914 45924 
LIST = 4804 3292 
-SASTA= s*aeee 3596 599 
-8X = 000230 5894 594 


MAINDEC=11 


CEKBGC .P11 
AF ORK 184 
BF ORK 194 
BLK 6154 
BLKB 6154 
COMME N lf 
DEQUE 284 
E oa 
ENDCOM 14 
ENQUE 
ERROR 978 
2876 
ESCAPE 14 
EXTRAS 324 
GETLID 264 
GETPID 25a 
T 14 
GETSID 244 
T 14 
IISTD 234 
LISTE con 
LOOP 154 
LOOPX 154 
ME MBOX 204 
MULT 14 
NEWTST | it 
1747 
P 1 
POP 14 
PUSH 14 
QINIT 284 
PORT 14 
RESPRI 304 
SAVPR I 2oF 
SCOPE 984 
SETK 154 
1735 
SETPRI 14 
TS 154 
SETTRA 39494 
SETU 154 
SETUP 14 
SKIP lf 
14 
SPACE 4748 
STARS 14 
1424 
1659 
2439 
SWRSU 14 
SYNC 
TEST 154 
1916 
TRMTRP 39498 
TSTNO 
TSTNUM 154 
1917 


“CEKBG~C ag Ps! 


2044 


2126 
632 
641 


2022 
3974 


636 
645 


2224 


11/70 SYSTEM POWER FAIL 


9 
MACY11 30a 1052) 13=MAR-80 16:04 PAGE 
CROSS REFERENCE TABLE ~~ MACRO NAMES 

649 653 657 661 665 674 
669 
2263 2325 2399 2416 2485 2561 
1482 1524 1553 1598 1625 1653 
1482 1524 1553 1599 1623 1653 
1424 1459 1488 1528 1557 1603 
2439 2600 2762 
3754 

1493 1504 1533 1544 1562 1574 
1662 1673 

1722 1733 

595 608 731 734 1299 1301 
1490 1528 1530 1557 1559 1603 
1747 1749 1913 1915 2039 2041 
2764 3274 3424 3594 3655 3744 
1462 1491 1531 1560 1606 1630 
2603 2765 

2493 2654 2776 

1463 1492 1532 1561 1607 1631 
2604 2766 


105 


683 


2578 


1683 
1683 


1627 


1608 


687 


2646 


and wad 
NN 
ad ooh 
LNW 


1657 


1691 


725 


2722 


1743 
1743 


1687 


1675 


1721 





4 


SEQ 0115 


2739 


1777 
1777 


1717 


1751 


MAINDE C=-11-CLEKBG=C 


CEKBGC .P11 
TYPBIN la 
TYPDEC lf 
YPNAM 14 
TYPNUM 14 
TYPOCS 14 
TYPOCT a 
TYPTXT 4 
UBER 328 
UBES 314 
V 174 
VS 184 
SMSTRT 4 
6064 
6064 
SSESCA 4 
SSNEWT wa 
1747 
SSSET 39494 
SSSKIP 19 
-EQUAT 14 
- HEADE 14 
-IIST 14 
-KT11 14 
. SETUP 14 
° I 14 
-SACT1 a4 
- SAPTB 4 
- SAPTH 14 
- SAPTY = 
-SASTA 14 
-SCATC lA 
oe 14 
. 14 
° 14 
-$DIV 14 
. SEOP 14 
- SERRO 14 
- SERRT 14 
- SMULT 14 
- SPOWE 14 
. SRAND 14 
- SRDDE va 
- $RDOC 14 
- SREAD 14 
- SR2AZ 14 
* 14 
-$ 14 
- $SCOP 14 
- SSIZE 14 
- SSUPR 14 
- STRAP 14 
STYPD 14 
STYPE 14 
. $TYPO 14 


3422 


3925 
3742 
3653 


1159 


PDP-11/70 SYSTEM 
13=MAR-80 16:04 


1873 


POWER FAIL 
1962 2085 
3328 3337 
1576 1587 
1431 1467 

715 717 

722 723 
1389 1424 
2277 2439 
3961 


9 
MACY11 30a 1052) 
CROSS REFERENCE TABLE -- MACRO NAME 


2180 


1459 
2600 


2191 


1488 
2762 


13-MAR~80 

S 
3318 3334 
3364 3569 
1706 1736 
1567 1611 
1528 1557 


3343 


1603 
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3352 


1627 


1695 


1657 


SEQ 0116 
3368 
1725 1759 
1687 1717 


N 9 
MAINDE C-11-CEKBG-C PDP=-11/70 SYSTEM POWER FAIL MACY11 30A(1052) 13=-MAR-80 
CEKBGC .P11 13=MAR-80 16:04 CROSS REFERENCE TABLE -~- MACRO NAMES 
-8400A lf# 
.1170 Tj 90 
. ABS. 111270 000 
ERRORS DETECTED: 9 
CEKBGC. ERIN Cet .LST/CRF/SOL/NL : TOC=CEKBGC.SML,CEKBGC.P11 
RUN-T I 8 5 SECONDS 
RUN-TIME vad 196/127=1.5 
CORE USED 3% 6(77 PAGES) 
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SEQ 0117 


